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expanding horizon of office and home use of 
new communications and data services tying smart 
terminals into networks through telecommunications 
links makes the world need a high speed terminal 
program. 

Busy computers shouldn't have to wait for data simply 
because an old fashioned link can't handle today 
and tomorrow's telecommunications. Slow terminal 
telecommunications can stand the smart operator's 
world on its ear. 

Into today's fast paced world, Micro Systems Software 
presents MicroTerm, the first truly high speed terminal 
for this inquisitive world. Some computers can run 
at up to 4800 baud null-free (9600 in some direct- 
connect applications). 

MicroTerm enables you to do more in less time, in 
both ASCII and the new "error-free" direct file mode. 
Its unique Macro-Key function allows you to have 
10 user-defined keys that transmit up to 64 characters 
at a single stroke. You can even dial a phone number 
and transmit the buffer at a specified time com- 
pletely unattended by the operator. 

And while MicroTerm improves your computer's 
"ears" by outperforming any other telecommunica- 



tions terminal program, its low price won't take a bite 
from your bit budget. It's only $79,95 retail. 

You can't lose with MicroTerm's features, performance, 
price, documentation, or support. 

It's the only terminal program enabling you to continue 
operations in the command mode while receiving 
additional data through the RS232 cable. And you 
can adjust video width, turn on the printer, open the 
buffer and do many other things and then return to 
the terminal mode without missing 'a thing. 

Available for the TRS-80 Models I, II, III, 16, IBM PC, 
Zenith Z-100, and Apple II computers. 

If these advantages are what you want in your world, 
communicate with your nearest MicroTerm dealer. 
For information contact: Micro Systems Software, 
Inc., 4301-18 Oak Circle, Boca Raton, Florida 33431, 
Telephone Toll Free: 1-800-327-8724 
In Florida (305) 983-3390 













MICROSYSTEMS SOFTWARE, INC. 

4301-18 Oak Circle, Boca Raton, Florida 33431, Telephone: (305)983-3390 

Toll Free 1-800-327-8724 




Put 64K CP/M 2.2 in your 

TRS-80 Model III and tap into 



2,000 business progia 



Now you can run programs such 
as WordStar, dBASE II, 
SuperCalc, MailMerge and vir- 
tually thousands of other CP/M- 
based programs on your TRS-80 

Model III. 

CP/M 2.2 Is the industry stan- 
dard operating system that gives 
you access right now to over 
2,000 off-the-shelf business pro- 
grams. 

Our plug-in Shuffleboard 111 
comes with 16K of RAM, giving 
your Model 111 the power of full 
64K CP/M 2.2 without inter- 
ference of the ROM or video 
memory. In fact, the Shuffleboard 
will appear transparent in the 
TRS-80 mode and will not inter 
fere with any DOS operation. 

READ and WRITE Osborne, 
Xerox and IBM personal 
computer software plus many 
more popular formats. 

Unfortunately, there is no stan- 
dardized CP/M format for 5W " 
diskettes. But we have developed 
a way to READ/WRITE and RUM 
standard programs under the 
following single-sided formats: 
Osborne 1 S/D, Xerox 820 S/D, 
IBM PC* D/D for CP/M 86 only, 
Superbrain D/D, Kapro II D/D, HP 
125 D/D and TeleVideo D/D. 

•Will Read and Write Only. 

Easy plug-in installation* 

It's so' simple. The Shuffleboard 
III plugs into two existing sockets 
inside your Model III. There are no 
permanent modifications, no cut 
traces and no soldering. You'll be 
up and running 
in minutes. 




Mew Products, 

80 x 24 VIDEO BOARD: Features 
dual intensity screen, programmable 
cursor control for block, underline & 
blink rate, on-board bell with audible 
keyclick. battery-operated real time 
calendar/clock, full ASCII character 
set plus 256 special character 
graphics, dual RS-232 outputs and 
composite video output. 

FLOPPY DISK CONTROLLER: Mow 
you can access 5Va " and 8" floppy 
disk drives in any combination up to 
4 drives of S/D density, S/D sided. 
Tap into a wealth of CP/M software 
which comes on 8" IBM 3740 format 
or Pickles & Trout CP/M for the Model 

li. 

SOFTWARE: Additional CP/M soft- 
ware programs are available. Call or 
write for details. 



Introductory price of 




u i ■ ¥- » •■ ' 



OEM and DEALER inquiries 
invited. 




The Shuffleboard 111 comes fully 
burned-in and tested complete 
with 64K CP/M 2.2 and MBASIC 
80 interpreter, plus software 
manuals and a first class user's 
manual — with a 1-year limited 
warranty and 15-day no-risk free 
trial — for only $299. 

See the Shuffleboard 111 at 
your dealer's now. 

Once you see what the Shuffle- 
board can do for your Model ill 
you'll want one at once. If your 
dealer does not yet stock the 
Shuffleboard have him give us a 
call. Or send check, money order, 
VISA or MASTERCARD number 
(sorry, no COD's) plus $5 shipping 
per board ($ 17 outside the USA & 
Canada)* directly to the address 
below. Ca!. residents please add 
sales tax. Credit card purchases 
can be phoned in directly and 
we'll ship from stock. 
(415) 483-1008 

* Air mail shipments to Canada G all other 
countries, 



memorv 1 " 
merchant 



14666 Doolfttle Drive San Leandro, CA 94577 

(415)463-1008 




WordStar & MailMerge are trademarks of MicroPro. 
SuperCalc is a ti ademark of 5QRCIM. 



dBASE II is a trademark of AshtonTate, 
CP/M is a trademark of Digital Research, 



TRS 60 is a trademark of Tandy CtHpuration 
ftJM is a trademark of iBM Coi puration. 
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® 1963 80-Northwest Publishing, Inc. All lights 
reserved. Reproduction for other than personal, 
non-commercial purposes, or further distribution 
in any other form, is prohibited. No patent liability 
is assumed with respect to the use of the 
information contained herein While every 
precaution has been taken in the preparation of 
this publication, the publisher assumes no 
responsibility for errors or omissions. Neither is any 
liability assumed for damages resulting from the 
use of any information contained herein Please 
address correspondence to: Basic Computing, 
3838 South Warner Street, Toco ma, Washington 
98409, (206)475-2219 voice, (206) 756-0448 
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Authors: We constantly seek material from 
contributors. Send your material (double 
spaced, upper/lower case, please) ana allow 
approximately 4 to 6 weeks for review Programs 
must be supplied in machine-readable form on 
diskette or tape, clearly marked as to model and 
operating system. Text files may be on diskette, 
but please include a hard copy as well. Media 
will be returned if return postage is provided. 
Cartoons and photographs ore welcome 
Generous compensation will be made for non- 
trivial works which are accepted for publication. 
Basic Computing pays upon acceptance rather 
than on publication. 

SUBSCRIPTION PRICE: U.S.: $19.97 for one year, 
$34.97 for two years and $49.97 for three years 
Canada and Mexico: S29 per year, no two or 
three year subscriptions are offered All other :$36 
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Two and three year subscriptions are not offered 
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Computing is published monthly by 80- 
Northwest Publishing, Inc., 3838 S. Warner St., 
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States of America. 

POSTM ASTIR: Please send change of address 
form 3579 to Basic Computing, 5615 West 
Cermak Road, Cicero, Illinois 60650 Second 
Class postage PAID at Tacoma, WA and 
additional entry points. 
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tray are from the caseation of Cathy Doud, 
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Editorial 



A flyer just crossed my desk 
that advertised a two-day 
seminar on using VisiCalc and a 
three-day one on programming in 
BASIC. Both subjects are 
commendable and worthy topics. 
The VisiCalc seminar costs $395 
and the other is only $545 per 
participant. Come on . . . this is 
getting out of hand. 

Granted, the seminar leaders 
have an excellent reputation and 
give superb presentations. The 
location is one of the finest sites 
that the Pacific Northwest has to 
offer. I thought, "Okay, maybe 
they plan to go into very exotic 
material." 

Still, at those prices I was sure 
that no one would sign up to take 
them. Wrong. Two weeks before 
the classes began, there were 15 
students in each, and every 
indication was that it would sell 
out. 

According to the mailer, you go 
from learning about the 
components of a computer system 
to running and correcting a 
program. Insights are given to 
the LET, END, and PRINT 
commands, some READ, some 
DATA and a GO TO. After that, 
you get to hear about how to write 
and debug a program. (I am 
surprised they don't immediately 
go into how to market and 
package it for sale or, possibly, 
how to be a computer consultant.) 

The class continues into data 
base concepts, setting up and 
accessing sequential files and 
even two-dimensional arrays. 
(All this for a novice?) That is 
amazing. In over ten years of 
teaching programming I never 
imagined that it was all so easy to 
learn (or lucrative). The class also 
discusses applications such as 
VisiCalc and how to use it, word 
processing software, data base 
programs and over six different 
application areas for use of a 
personal computer. 

Once, I considered taking a job 
teaching the basics of computer 
use and programming to the 



By Cameron C. Brown 

salesmen of a minicomputer 
company. To get a feel for their 
background, I took their two-day 
orientation class. A video tape 
presentation taught me the 
twenty-two jargon words needed 
for success. Liberally sprinkle 
your conversation with them and 
the buyer will be convinced, 
confused, and impressed. At that 
point the customer should be 
putty in your hands. I was shown 
each competing brand and 
carefully coached as to its 
failings in comparison to "ours/' I 
was even able to run some 
software for a few hours (it was 
an inventory program). Class 
was over and I was ready to sell 
those $45,000 systems. 

I did not take the job and 

hoped that such days were 
coming to a close. But, combine 
the opportunity to make some big 
money, a huge, uninformed, and 
hungry audience, lots of media 
hype and high-priced seminars 
have an excellent chance for 
success. I am sure that each 
participant leaves feeling that he 
more than got his money's worth. 
The promoters are to be 
congratulated for seeing a need, 
setting up a program, and 
delivering a timely product. 
Personally, I am looking forward 
to the time when the number of 
suppliers of the knowledge meets 
the demand for it. Right now, 
high schools, community 

colleges, universities, libraries 
and even some user groups are 

low-cost alternatives. Even your 

Radio Shack store offers courses 

for a minimal fee. You could even 

buy every back issue that we have 

for only $108. 

Before I leave r here is 

something for the new VisiCalc 

user: Turn on your computer, 

slide the VisiCalc diskette into 

the disk drive and hit the reset 

button. Answer the date question 

and from TRSDOS Ready type 

the letters VC. This will load the 

VisiCalc program for you to use. 

Class is over. That will be $27.50 

please. You're welcome. 
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Letters to the editor 




Cameron C. Brown 



The Datagraph program, 
reviewed by Mr. Bowman in the 
June issue, surpassed my 
expectations in its ease of use and in 
the quality of the high resolution 
graphs it produces on my Model III, 
LP VIII business system. Its 
autoscaling, axis labeling, error 
trapping and customized format 
features are delightful. As Mr. 
Bowman said, the 'graphs are quite 
attractive. He also described the 
manual provided by Micro Software 
Systems as "very unfriendly." To 
the contrary, I find its liberal use of 
illustrations, graphs and examples 
most helpful. I want to recommend 
the documentation to all 
programmers as an example of 
excellence to be imitated. The 
explanations are detailed and 
comprehensive, instructions 
effectively leading the user in a 
logical, step-by-step understanding 
of the many features of the program. 
Thank you for bringing this fine 
program and manual to my 

attention. 

Don Cram 
Los Angeles, CA 

Mr. Bowman *s reply: I stand by my 
comments and I would seriously 
question how the first-time user 
could successfully run the program, 
based upon the manual alone. 



instruments. 



I have a Color Computer version 
of my Guitar Seminar program 
which ran in the July, 1983 issue. 
Any reader desiring the program 
may obtain it from me on tape for a 
donation. 

The color version requires 16K 
Color BASIC and documentation is 
the same as for the Model I. I've also 
included a one-sheet programming 
guide on how to make use of 
Extended Color BASIC'S PLAY 
command. I would also like to hear 
from anyone who has written 
tutorial-type programs like Guitar 
Seminar for other musical 



'Lynard Barnes 

320 So. Whipple St. 

Chicago, IL 60612 



Two improvements to my Smith- 
Corona TP-1 printer have been very 
valuable. First, I purchased a driver 
for this printer from ALPS, one of 
your advertisers. This does a super 
job of matching it up with my Model 

III. 

The second item was the 
installation of a thermostat so that 
the fan doesn't run all the time. The 
noise from this fan can be irritating 
and most of the time it is 
unnecessary. I obtained this low- 
priced thermostat from THERM-O- 
DISC, Inc., P.O. Box 689, Aiken, SC 
29801, on the recommendation of 
Smith-Corona. The type number is 
36T22 (X-73134R). Installation was 
easy, but I would contact Smith- 
Corona for details as to where to 
locate it, etc. These two alterations 
have made this inexpensive system 
an excellent (and quiet) word 
processor. 

Al Hurst, CLU 
Tacoma, WA 



I bought a copy of your magazine 
recently and liked very much what I 
saw. Of particular interest was the 
article Moving Day for DEBUG, by 
Don Bazzurro, April, 1983. I, too, 
had found DEBUG's usefulness 
somewhat limited by its incon- 
venient location in RAM (I own a 
16K system). Many thanks to Mr. 
Bazzurro. I would like to share with 
other readers a short machine 
language routine I wrote that 
performs the bulk of the work of 
relocating and converting DEBUG 
without all the hassle of resetting, 
reloading, etc. as described by Mr. 
Bazzurro. It is also quite fast. With 
all due respect to Mr. Bazzurro (who 
did do all the dirty work of 
disassembly, etc.), here's a much 
simpler way to relocate DEBUG: (1) 



Load DEBUG, (2) use the M 
comman d to enter the short m achine 
language routine listed below (I've 
included the assembly language 
statements and comments for those 
who'd like to know what is going on), 
and (3) use the J command to execute 
the routine (ADDRESS?= 6000). 
Control will be returned to DEBUG 
when the routine is done. 

In a flash, the routine moves 
DEBUG to its new location and 
converts all bytes having a value of 
43-49H to 73-79H. All you have to do 
now is restore the 66 addresses listed 
in the article, write the new version 
to tape, and you're done. 

Conrad Sabatier 
New Orleans, LA 



| SUPERSCRIPSIT 
PRINTER DRIVERS 






with an ALPS printer driver (software), you can 
attach your printer to the Super SCRIPSIT word 
procesaer. Over ■IS printers now supported. Call* 
write, or circle reader r. umber for latest 
Product Review Sheet 4 

Epson KX-oG and MX- TOO (Graf tra*-Flus ) / FX-80 
Cltoh Pro writer (8510) / r'-lO / FP-1 500-25 
Qume Sprint V / IDS Priam / Mioroprlam 
Olympia ESV 102,103.3000 / ES 1Q1JQ5 
NEC 8023 / Spin writer 5530,7730.3530 
Diablo 630 1 16 10 1 1620 / DTC 3BQZ 

*59 



Qkldata Microline 82 ( 83, 8*1 * 92 * 93. B4S2 
Smith-Corona TF-I / Gemini 10,15 / *J 831 
Bytewriter / Olivetti ET121 / Brother Ht-1 
B, S. Line Printer V / PW1 / Man. Tally 160 
ftdler 1010 J 030 / Royal 5010,5030 / Comrei CR-1 

**9 



Serial Interface Program for Serial Printers t19 
Can be used for applications other than SCRIPSIT 
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NEW FOR MODEL * 0VHE25 



Utilities to access Model 
Model 111 node. 



Ron Model M at high CPU speed {** MHz) 
Test Memory £Up to 128K) Automatic Routine 
Clear Hewory Routine 
Use Sound tBeep^ 

All Four Utilities on Diskette 
118,99 




JJ features while In 






Mall / Phone Orders Accepted 

ALPS 

23 Angus Road t 

Warren, New Jersey 07060 

201 - 647-7230 
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CATALOG 

* ANY DISK * 
REGARDLESS 

OF DOS, DENSITY 
OR TRACK COUNT 
IN SECONDS... OR 
YOUR MONEY BACK! 

The Arranger is a very fast 
1 00% Z-80 machine language, 
self contained master disk 
catalog filing program that 
automatically records disk 
name, date, density, DOS, free 
space, track count and data 
type in seconds on almost 
anything! 

With the Arranger you can: 

* Catalog 250 disks— 44 files 
(double density) 

* Find any program in 30 
seconds 

* Sort 1500 files in 40 seconds 

* Sort by extension or wildcard 

* Single or multiple drives 

* Scan files starting at any point 

* Search by wildcard 

* List or print files alphabetically 

* Add or update your disks in 
seconds 

* Rename disk at any time 

The Arranger is totally inde- 
pendent, complete with its own 
backup function. We believe 
the Arranger to be the finest, 
fastest, easiest to use disk 
catalog filing program available 
and the least expensive. 
Single Density Model I or 
Double Density Model l/MI 

$29.95 

PREE£> 
CflTflLOQ 

oi Serious Software 
for your SO 

Daily Saturday 

10-5 VISA-MC 10-2 

tollfrel 1-800-692-5235 
IN CA 1-213-873-6621 

CDC 

13715 VANOWEN STREET 
VAN NUYS, CA 91405 
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LOCATION OBJ. CODE LABEL 






6000 


21 


32 


43 


6003 


11 


32 


73 


6006 


01 


OE 


06 


6009 


ED 


BQ 




600B 


01 


32 


73 


600E 


21 


0D 


06 


6011 


11 


FF 


FF 


60U 


0A 






6015 


FE 


43 




6017 


FA 


IF 


60 


601A 


FE 


4A 




601C 


FA 


24 


60 


601F 


03 






6020 


19 






6021 


38 


Fl 




6023 


F? 






6024 


C6 


30 




6026 


02 






6027 


18 


F6 





MOVE 


LD 




LD 




LD 



FIX 



LOOP 



OK 



CONV 



PROGRAM LISTINC 

SOURCE STATEMENT 

HL.4332H 
DE.7332H 
BC.1550 

LDIR 

LD BC.7332H 

LD HL,1549 



LD DE.-l 

LD A,(BC) 

CP 43H 

JP M,0K 

CP 4 AH 

JP M.C0NV 

INC BC 

ADD HL.DE 

JR C , LOOP 

RST 30H 

ADD A.30H 

LD <BC),A 

JR OK 



COMMENTS 









; Start of original DEBUG 

; Start of new DEBUG 

; Number of bytes to move 

;Move r em! 

; Start of new DEBUG 

; Count is one less than before 

{because loop terminates when 

;HL=-1 (Instead of zero) 

;Added to HL to decrement count 

;Get byte from memory 

; Compare It to 43H 

;Jump if less than 43H (no convers 

; Compare to AAH 

;Jump if less than 4AH (convert) 

; Increment pointer 

; Decrement count 

;Go again if not done 

;Else return to (old) DEBUG 

;Convert bvte 

; Store it back to memory 

;Jump back 
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I have seen several letters asking 
if anyone knew of a program that 
would put graphics, complete with 
scrolling titles on their videotape. 
The answer is yes, if you have a 
Color Computer with at least 16K. 
The source of the program is Radio 
Shack. The Art Gallery ROM pack, 
#26-3061, and it sells for $39.95 

About two years ago I spliced 
together about five hours of 8MM 
film that my father-in-law had taken 
over a 30 year period. After having 
Fotomat put them on videotape, I 
wondered if there was some way to 
add a title, identify the scenes, list 
the cast, etc. 

All you have to do is design your 
own titles, pictures, etc. using the 
draw and edit controls. Attach a 
twin-lead 300 Ohm cable to the 
antenna connection of your monitor 
and the other end to your video 
recorder (mine is a Sony 5400). Start 
the recorder and key option 5 to 
"display dynamic results" or option 
6 "load and run presentation/' When 
the display is complete, hit the freeze 
or pause button on the recorder and 
switch to your other input. I put 
mine on the tape after the 8MM film 
had already been recorded so the 
title I put on the front of the tape has 
a short blank space between the title 
and the movie. The trailer I put at 
the end makes a better transition 
from movie to graphics. 

It may not be as good as a 
professional production, but you 
can't beat the price of the equipment 
and software nor the fun of doing it. 

Mike Schottenbauer 
Hopewell, VA 

Also, an article entitled "Hook 
your CoCo up to your home VCR", 



by Bob Rosen was in the October, 
1982 issue of the RAINBOW. Ed. 



I believe that the article 
"Lowercase and more", June 1983, 
unnecessarily complicated the 
process of adding lowercase to a 
Model I TRS-80. I have installed, 
with success every time, the 
lowercase modification in several 
machines and I do not consider 
myself a hardware hacker. The 
easiest lowercase modification 
involves only one I.C., which sells 
for less than $1.00 from many 
outlets, and a couple of pieces of 
wire. 

The one I.C. is a 21L02, available 
from Radio Shack and other outlets. 
To use it, pins 1 1 and 1 2 must be bent 
out and then the chip is piggy- 
backed onto Z45. All pins except 11 
and 12 are soldered to the 
corresponding pins of Z45 below. So 
far, that follows the procedure 
outlined in the article. However, 
instead of making the remaining 
connections as outlined in the 
article, simply connect pin 12 of the 
added 21L02 to pin 13 of Z27 
(directly above Z45 on the main 
circuit board). Then connect pin 11 
of the added 21L02 to pin 13 of Z44 
(directly to the left of Z45 - it is more 
convenient to use the plated-through 
hole adjacent to pin 13 to make the 
connection). Finally, cut the thin 
trace that comes out from 
underneath Z29 and runs between 
pins 5 and 6 of Z30. That's it for the 
simple modification. If you have a 
late Model I, you may be lucky 
enough to already have the 
lowercase character generator chip 
installed. You do if the cursor 
character and the tails of the comma 
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I've never heard of Basic Computing. Why? 

You've been missing something. Since 1978, we were called 80-U.S. Journal We have now changed our name to 
more accurately describe what we write about. We are computerists who publish a journal, not publishers talking 
about computers. 

What is Basic Computing? 

We are a monthly magazine covering all models and aspects of the TRS-80 microcomputers. Each issue contains a 
mix of articles and programs for every level of expertise in the computing field. 

We have regular columns and departments to help both the beginning Color Computehst and the advanced 
Model III assembly language programmer. We make a special effort to make our publication understandable to 
beginners and advanced computerists alike. 

What makes Basic Computing special? 

We give complete program listings that are from working programs, not just bits and pieces of computer code. 
Material in our journal comes from actual computer users, not writers who have little hands-on experience with your 
model. We discuss and give working programs for every mode! of TRS-80, If you own a TRS-80 Model I with exotic 
hardware additions, or use a Model 100 to communicate to a Model 16B, we have information you need, 

What does it cost? 

Only 31 9.97 for a full year's subscription. That's less than $1 .67 per month for one of the most informative magazines 
you can buy for you and your computer. Even greater savings are possible with longer subscriptions. 

Ok! I want to subscribe. What do I do? 

It's easy. Fill out the attached order card and drop it in the mai 
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BACK ISSUES 

May/Jun 1979 

String packing techniques 
Determine functions of the brain 
How to win Nim-type games 

Jul/Aug 1979 

Create fast graphics 

Renew lost programs 

No-hardware lowercase mod. 

Nov/ Dec 1979 

Function grapher/root finder 

Home heat loss program 

Restoring killed disk files 

May/Jun 1960 

Telecommunications with the 

TRS-80 

BASIC game program technique 

Produce sound with BASIC 

programs 

Nov/ Dec 1960 
Simple payroll program 
Digital plotter interface 
Produce keyboard typeahead 

May/Jun 1981 
Line packing techniques 
How to use "PRINT USING" 
Animation and the TRS-80 

Jul/Aug 1961 

Descending lower case for Model I 
Student timetable program 
Easy tape loading for Model I 



Sep/Oct 1961 

Keyword search database 

Compute a retail installment 

contract 

The vertical mill: a 3-D plotter? 

Nov/ Dec 1981 

Comparison shopper program 
Real time clock construction 
Pocket Computer foiorhythms 

Jan 1982 

Microcomputers in business 

Feb 1982 

* 

Micros and word processing 

Mar 1982 

Microcomputers and medicine 

■ 

Apr 1982 

Microcomputers and investments 

May 1982 

Space: An infinite frontier 

Jun 1982 

Games issue 

Jul 1962 

The TRS-80 in law offices 

Aug 1982 

Microcomputers in education 



Sep 1962 

Graphing and g 



cs 






Oct 1982 

Microcomputing tips and tricks 

Nov 1962 . 

Telecommunicate with your computer 

Dec 1982 

Disks and DOSs 

Feb 1983 

Computer languages: Reports on 
Pascal. COBOL Pilot and Forth 

Mar 1983 

Data base management 

Apr 1983 

Computers in government 

May 1983 

Special peripherals issue 

Jun 1983 

Low-cost changes for your computer 

Cost is $4.00 for each back issue 
ordered. Use the reply card to order, 
or you may write/phone Basic 
Computing, 3838 South Warner St.. 
Tacoma, WA 98409-4698, (206) 475- 
2219. 
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Letters 

and semicolon extend a bit below the 
baseline of the other characters. If 
that's the case, you can consider 
yourself lucky; you're all finished. 

If you are using Level II BASIC or 
some DOS's like TRSDOS, you will 
see strange graphics characters 
instead of the uppercase letters 
you're accustomed to seeing. There 
are several solutions to this, 
including the installation of a SPDT 
switch similar to that described in 
the article. To accomplish this, 
disconnect the wire from the added 
21L02; pin 12, toZ27, pin 13. Connect 
the 21L02 pin 12 to the center 
terminal of the SPDT switch. 
run nect Z27, pin 13, to one end of the 
SPDT switch, run a wire from the 
other end oftheswitchtoZSO, pin 13. 
Now you may switch back and forth 
between normal and lowercase 
operation. 

The preferred solution is to replace 
Z29, the character generator I.C. 
When this is done, no switch is 
required because the oddball, and 
inaccessible, graphics characters 
are replaced by normal uppercase 



characters. It is possible to purchase 
the character generator from Radio 
Shack, but that is expensive. Other 
vendors also sell replacement 
character generators of various 
types. The best I have seen so far 
comes from Australia. It provides 
full three-line descenders (the Radio 
Shack replacement chip provides 
single-line descenders). It sells for 
$12.90 Australian funds, plus $4.00 
additional for an optional printed 
circuit board. If ordering from North 
America, and paying in U.S. dollars, 
add $3.50 for postage and bank 
exchange fees. 

What you are buying is a pre- 
programmed 24 pin EPROM, and 
adequate instructions for those who 
are somewhat familiar with the 
in sides of a TRS-80. The unit is not 
designed for installation by 
beginners, but experienced 
hardware hackers should have no 
difficulty. To obtain it, order mode] 
"J ACKGEN 3" from Don McKenzie, 
29 Ellesmere Crescent, Tullamarine 
3043, Australia, Don normally 
provides same day turn-around. In 



my case it works perfectly and I am 
very pleased with the result. 

Jack Decker 
Sault Ste. Marie, MI 



In the May, 1983 Notes, etc. 
section there was a response from 
Mr. Wayne King to my File Copy 
Utility which ran in the January 
issue. Unfortunately, his method of 
clearing more than 32767 bytes of 
string space was not sufficient for 
my Disk Interchange Program, DIP. 
DIP uses a great deal of string space 
and, as published, will frequently 
lock up in garbage collection. 

However, I now have a new 
version of DIP which does not suffer 
from this deficiency. It will also 
automatically configure itself for 32 
or 48K and allows the user to 
optionally specify if verification of 
the destination disk is required. I am 
happy to make DIP available to 
readers for $10. 

Charles C. Edwards 

5901 Mt. Eagle Dr., #1118 

Alexandria, VA 22303 



PRICES 



LNW-80 Model II 



$1595 



12BK, 578" DISK COMTR. RGB COLOR. HI- 
RES GRAPHICS, RS 232, PAR PRINTER PORT. 
80x24 DISPLAY, 1 YEAR WARRANTY, PLUS 

FREE SOFTWARE 

MICROSOFT BASIC, LNW BASIC, DOS+ 3.4, 
CPM 2.2, CHART X GRAPHICS. MICROTERM, 
ELECTRIC PENCIL ELECTRIC SPREADSHEET, 
PROF. BUSS. ACCT1NG (general ledger, acct& 
pay, acct& ret, payroll) 

SPECIAL THIS MONTH 

COMPUTERS 

PMC 8 1 . 1 6K $499 32K EXPANDOR $329 

TIMEX $56 16MEM $42 

APPLECLONE(SYSCON2) $599 

TRS 80 COLOR COMP. !6K $269 

TRS-80MOD.IV,64K,240TRKS/S $1,799 

CRT MONITORS 



AMDEK 3 00 GREEN 


$139 


AMDEK 300 AMBER 


$159 


AMDEK COLOR 1 


$359 


AMDEK COLOR II 


$639 


TAXAN RGB COLOR 1 


$299 


TAXAN RGB COLOR 111 


$535 


TAXAN GREEN 


$125 


TAXAN AMBER 


$139 



YOU 



CAN'T BEAT! . 
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TEAC Vi SIZE DRIVES 

Bare Compl 

FD 55A 40TRK S/S $209 $245 
FD55B40TRK D/S $280 $319 
FD 55F 80TRK D/S $350 $390 

ALL TEACS HAVE A 1 YEAR WARRANTY 



TANDON DRIVES 

100-1 40TRK S/S 
100-2 40TRK D/S 
100-4 80TRK D/S 



Bare 

$189 



Compl 



$340 



$299 
$385 



ECONOMY DRIVES 

COMPLETE W/CASE/PWR SUPL/CABLE 



40TRK S/S 



$195 



APPLE COMPATIBLE DRIVE 

W CONTR CARD, CASE & CABLE $295 



C-ITOH PRINTERS 

PROWR1TER8510 

PROWRITER 1550 

M0 40CPS 

F-10 55CPS 

F- 10 TRACTOR FEED 

QUME SPRINT 1 1 40CPS 

MODEMS 

NOVATION j-CAT 
SIGNALMAN 



PAR 
$429 



$1295 
$1550 



SER 

$539 

$739 

$1295 

$1550 

$195 

$1,450 



$135 
$85 



SYSTEM EXPANSION II 

UPGRADE YOUR MOD 1 OR PMC 80/81 WITH 
DISK CONTROLLER • RS 7^2 -PARALLEL 
PRINTER PORT 32K 200 NS MEMORY ■ GOLD 
CONNECTORS -TRANSFORM CASE ■ CABLE 



SPECIAL THIS MONTH 



EXPANSION INTERFACES 

MICRO DESIGN MDX-2 
MICRO DESIGN MDX-3 
LNW DOCJBLER w. DOSH- 3.4 
DOUBLE DENSITY MULTIPLIER 



$329 



$449 
1289 

$189 
$95 



SOFTWARE 

LAZY WRITER Si 59 

ELECTRON IC WEBSTER $119 

MAXI MANAGER $129 

POSTMAN $ I 1 9 

DOS PLUS 3.4 $89 



MULT I DOS 
SUPER UT] 
MAS 80 
NEWSCRIPT 
OMNI TERM 



$89 

$65 

c«.$l35 

$114 
$78 



24 HOUR TOLL FREE ORDERS 
VISA/MASTER CHARGE ONLY: 
, (800) 633-2252 EXT 720 

ALL QUESTIONS: (313)538-1112 

MICHIGAN RESIDENTS ADD 4% SALES TAX- POSTAGE 
CALL FOR CHARGES- PRICES ARE DiSCOUNTED FOR 
CASH AND MONEY ORDER (NON CERTIFIED CHECKS 
ALLOW 2 WEEKS TO CLEAR) MASTER CARD AND VISA 
ADD 3% NO COD. NO NET TERMS 




X/F^P A COMPUTER OUTLET 

w LmVJ M' \ 167?7Patton Detroit Ml 48? 19 









VIDEO INSTRUCTION TAPES! 

HOW MANY HOURS HAVE YOU SPENT 
READING DOCUMENTATION? 



LYNN Computer Service presents a new concept for 
computer users — The Video Instruction Series. A"REAL 
TIME" learning aid where the user is shown step by step 
how to use complicated operating systems and programs. 
Your VCR, used side by side with your computer, serves 
as your personal tutor. 

PICTURES ARE WORTH 

THOUSANDS OF WORDS AND SAVE 

HOURS OF FRUSTRATION 

VIDEO INSTRUCTION SERIES TOPICS: 



TRSDOS 1.3 MOD II 
LAZY WRITER 
SUPER SCRIPSIT 
SCRIPTSIT 
DOS PLUS 
PROFILE III PLUS 
PROFILE 



VISICALC 

NEWDOS80v2.0 

LYNN'S PAYROLL SYSTEM 

MULTIDOS 

LDOS 

LYNN'S A/R SYSTEM 

LYNN'S CHECKBOOK LEDGER 



VHS or BETA FORMAT 



ONLY 






39 



95 



EACH TAPE 



Level II Basic for Model I/III 

ONLY 



%p 



49 



95 



MASTERCARD — VISA and C.O.D. Orders accepted 

add $3.00 per orderfor shipping and handling. Telephone 

orders taken 9:00 a.m. - 6:00 p.m. Central Time. 

Specify either VHS or BETA Tape Format 

% Inch Tapes — $1 0.00 Additional Per Tape 

C.O.D. Orders add $3.00 




Dealer Inquiries 
Welcome 



';8ANKAMEf?tCA£i0; 



VISA 



WHY SPEND LONG HARD HOURS 
LIKE THIS. 




WHEN IT COULD BE EASY 
AS THIS! 

Software and Video Tape 
Combination 

OFFER! 

LAZY WRITER AND VIDEO TAPE 
ONLY $150 00 
NEWDOS80v2.0 WITH VIDEOTAPE 

ONLY$150 00 

LYNN'S A/R, PAYROLL, or 

CHECKBOOK LEDGER SYSTEM 

WITH VIDEOTAPE 

ONLY$99 00 



LYNN COMPUTER SERVICE 

6831 West 157th Street Tinley Park, Illinois 60477 
(312) 429-1915 

VISICALC IS A TRADE MARK OF PERSON EL SOFTWARE INC LAZY WRITER IS A TRADE MARK OF ABC SALES INC SCRIPSIT. SUPERSCRIPSIT. PROFILE. PROFILE PLUS AND TRSDOS ARE 
TRADEMARKS OF TANDY CORP LDOS IS A TRADEMARK OF LOGICAL SYSTEMS INC NEWDOS80 IS A TRADEMARK OF APPARAT INC DOS PLUS IS A TRADEMARK OF MICRO-SYSTEMS 
SOFTWARE INC MULTIDOS' IS A TRADEMARK OF COSMOPOLITAN INC 
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By Cameron C. Brown 




Who are we? 

This issue has a circulation of over 
50,000 and we suspect that many 
readers are seeing us for the first 
time. A short discussion about our 
magazine is in order. For over five 
years we were called 80-U.S.. Our 
name was changed to better describe 
what we do. We were, and still 
remain, a journal for the TRS-80 
user. 

The departments we have in each 
issue are a direct response to reader 
requests. Basically BASIC is for the 
beginning programmer. Here is 
where you can glean insights to 
writing your first programs. Even 
experienced computer users can pick 
up a trick or two from it. 

If you want BASIC in more depth, 
be sure to look at BASIC Bits and 
Files and Foibles. BASIC Bits, by 
Thomas Quindry is aimed at the 
Model I/III/4 audience. Direct your 
BASIC and assembly language 
questions here. Each month you can 
count on Tom to let you in on 
something that is not in your 
manual. Terry Dettmann's Files 
and Foibles is for the practical user. 
Each month he will give detailed 
excursions into file handling 
techniques. His code is so well 
structured and commented that it 
will almost always run on any 
model. 

Exploring VisiCalc, by Tim 
Bowman, takes us through one of 
the most popular pieces of software 
ever written. Com 80, by Don Stoner, 
and In The Chips, by Spencer Hall, 
are two special interest columns we 
run on a regular basis. Don will see 
to it that all your telecommunication 
questions are cleared up and 
Spencer's task is to help you become 
a confident assembly language 
12 Basic Computing 



programmer. 

You can always look here, in 
Notes, etc., for corrections, 
alterations and improvements on 
previously published programs. Be 
sure to look in our Letters to the 
Editor section as well, many times a 
reader will send in just the 
information you need. 

Those are some of the columns you 
can expect to see regularly. If there is 
a topic you want to see, or a question 
that needs an answer, drop us a card 
or letter. Our columnists are anxious 
to help. 

Besides the regular features, we 
run many programs and articles 
that are from you, the readers. Each 
issue will have programs and news 
for almost every model TRS-80. If 
you have a different or interesting 
use for your computer, or a program 
that can be beneficial to others, be 
sure to write and ask for our 
Author's Guide. We look forward to 
hearing from you, either with a 
question, a comment or a potential 
article. 

New president at Microsoft 

Mr. Jon Shirley, former Vice 
President of Computer Merchan- 
dising for the Tandy Corp., has been 
named President and Chief Execu- 
tive Officer for the Microsoft Corp. 
The replacement follows the resig- 
nation of Mr. James Towne. 
According to local media, Mr. Towne 
disagreed with the decision of 
Microsoft chairman William H. 
Gates to move the company 
vigorously into retail software sales 
rather than emphasizing its role as a 
supplier to computer manufacturers. 
Mr. Shirley takes this position after 
serving in the Tandy Corp. for 25 



years. The Tandy Corp. has yet to 
announce who will take over the role 
served by Mr. Shirley. 

The MC-10 

This latest machine from Tandy is 
different than all the others. It uses a 
6803 processor and has TeleBASIC 
1.0 which is a version of Microsoft 
Color BASIC. The language is close 
to that in the Color Computer. It is a 
little larger than theTimex/Sinclair 
computer and has its own cassette 
I/O. The I/O format is unique and 
programs magnetically recorded on 
the MC-10 cannot be loaded into the 
Color Computer (actually, they may 
load but won't run due to different 
end-of-line markers). You can re- 
enter the programs by hand from an 
MC-10 to a Color Computer and they 
will probably run; the two languages 
are very similar. Its price makes it 
Tandy's offering in the "disposable 
computer" market. Be sure to see 
Don Scarberry's review of it in this 
issue. 

The Model 16B 

This upgraded Model 16 is really 
just a reorganization of how Tandy 
plans to sell to the high-end market. 
Many people were choosing to 
purchase a Model 12 and upgrade 
rather than buy a Model 16. That 
way they got the extra keys, a lower 
"profile", and the extra card cage 
slots in the rear. The 16B is just an 
upgraded Model 12. There is no real 
change in the 68000 architecture of 
the computer. Multi-users should 
find going from three to six users a 
lot easier since the needed card slots 
are already in the 16B. 

Tape Journal 

Due to very low response, we have 



Notes 



discontinued offering our published 
programs on cassette. We are filling 
all orders that have been placed for 
January through June tapes. 
Annual subscribers should have 
received a full refund by now. 

Corrections 

The Model 100 printer formatter 
by Ed Juge in last month's Tandy 
Topics had a bug in line 350. Change 
the reference to line 358 to be . . . 
THEN 360 ELSE . . . 

Electronic Watchdog by George 
Farnsworth, June 1983, runs just 
fine. We forgot to label the program 
for Model I non-disk systems. Model 
I disk users will get an illegal 
function call in line 80 when 
attempting to run the program. To 
boot-up in Level II mode, hold the 
break key down while depressing 
the reset button. You do not have to 
set memory size; the program will 
work on a 16, 32, or 48K machine. 

If you want to run the program on 
a Model III system, make the 
following changes. Our thanks to 
Mr. Dan Sitch of Pittsburg, NH for 
sending them in. For 48K Model III 
Disk BASIC, change line 40 to read: 
40 OUT 255,8: S=INP(255): IF 
S<>124 AND S<>125 THEN 60 
ELSE 40. Also add line 75: 75 
DEFUSR0 = SI + 82*256-65536, and 
change the two USR(SS) in line 80 to 
USRO(SS). For Model III non-disk 
users, just make this change to line 
40: 40 OUT 255,8: S=INP(255): IF 
SO108 AND SO109 THEN 60 
ELSE 40. The two pokes in line 110 
may be deleted, or left in, when using 
Disk BASIC on the Model III. 

If you are using a CTR-41 tape 
recorder, remove the small, black 
insulator plug from the microphone 
jack. This plug is normally used to 
disengage the built-in microphone 
so that programs saved on cassette 
will not contain outside noise. 
Removing the plug will allow the 
Watchdog program to hear the 
outside noises (intruders) and react 
accordingly. 

The June column of BASIC Bits, 
page 59, had an error in the table. 
Normal Level II Model III BASIC 
storage starts at 43E9H, not 42E9H; 
thus PEEK(16549) should be 67, not 
66 as we stated. 

We are saddened to report that Mr. 
Jeffrey D. Clack, the author of 



Vehicle Maintenance, April 1983, 
has passed away. For those of you 
who wrote to him requesting more 
information and the program, we 
have been informed that his brother- 
in-law, Mr. Edward R. Sargent, 6431 
West 74 Ave, Arvada, CO 80003, will 
be responding and answering all 
inquiries. We thank you for your 
patience. 

Antimath, by Craig Hunt, May 
1983, had a slight mixup in line 280. 
After the code L4" is the beginning 
of line 290. Be sure to separate them. 
It seems our computer stripped out a 
linefeed when we printed it out. 

Puzzler 

Our June question asked how 
could you, using machine code, swap 
the A and B registers without using 
an intermediate storage register. 
Many people sent in the three lines: 

1) PUSH AF, 2) LD A,B, and 3) POP 
BC. It works, but it does destroy the 
flags in the process. A more elegant 
method, and the one we were 
initially looking for, is 1) XOR A,B, 

2) XOR B,A, and 3) XOR A,B. It 



works, but we found out that the 
exclusive or on the Z80 cannot be 
used that way on the A and B 
registers. We did not specify the type 
of processor and for brevity we have 
chosen the one submitted by Kent 
Meyers of LeRoy, MN to be our 
winning answer. On his Color 
Computer you just do EXG A,B. 

This month we are going back to 
BASIC code. When sorting strings, 
the computer looks at the ASCII 
values of the letters and this can 
result in output that is not what you 
want. For example, Zeta will be 
printed out after ZZZZ, not before. 
Can you devise a simple way to have 
the computer ignore the capitaliza- 
tion and sort on just the actual order 
of the letters? Be sure to watch out 
for punctuation and the use of 
periods, commas, apostrophes, etc. 
Send a copy of your working code 
and a sample printout to August 
Puzzler, Basic Computing, 3838 So. 
Warner, Tacoma, WA 98409. Do not 
send tapes or disks; no material is 
returned. The winner receives $10 
and a free tour of our facility. 



The Automatic Bibbon Re-Inker 

Re-ink any type of ribbon (except carbon) for less than 5 cents. 

Extremely simple operation. 1) Load cartridge or spool. 2) Add 
ink to reservoir. 3) Start motor. 

We have a MAC INKER for any printer—many MAC INKER units 
support multiple printers. Ink contains lubricant for safe dot 
matrix printhead operation. Multicolored CSInipitter 
inks available. Ask for brochure. FrienflS 

100 Northwest 86th Avenue 
Portland, Oregon 97229 
(503) 297-2321 





Price $54.95 
plus $3.00 S'^ffi 
Prices slightly 
higher for some 
printers. Total 
satisfaction or 
full refund. 
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Digitizing images with your TRS-80 



Models l/HI 



A. W. Moddox, Creve Coeur, MO 



Everywhere we look (well, almost everywhere) we see 
computer-generated printed pictures: on T-shirts, 
magazine advertising, billboards and sides of buildings. 
Why shouldn't those of us with the world's greatest 
micro be able to join the party? Well, we can. But first, 
some fundamentals. 

Two factors influence the quality of the image on 
black and white pictures (recognizing that "quality" is 
quite subjective). First is the number of shades of gray. 
Very few objects in real life are truly black or white. 
They are normally made up of infinite shades of gray. 
The image we see as a single light passes through a 
translucent object and yields not black and white, but 
many shades of gray. A highlight, produced by intense 
light, smoothly fades into ever-changing shades of gray 
as it goes around the surface of a sphere or other object. 
Multiple lights produce a different kind of shading. If we 
are intent on making quality computer pictures, we need 
to generate shades of gray. Unfortunately, the TRS-80 
monitor is limited to two shades as a pixel is turned on or 
off. We can resort to a printer, but we don't have a 
clearly-defined set of ASCII characters to produce 
shading. We can, however, get grays by overprinting 
one character over another. For example, an X printed 
over O produces a S. This is "darker" than either of the 
single characters. 

For my pictures, I use 26 shades of gray made up of two 
passes on the printer. That is, I first print the entire 
picture using one set of characters. I then manually 
rotate the printer back to reposition the paper to the start 
of the first picture and overprint with the second set of 
characters. This process will allow you to use any 
printer for your pictures. The 26 shades (one for each 
letter) are: 

CODE ABCDEFGHIJKLMNOPQRSTUVWXYZ 
SHADE *1 ♦♦— ==++YYJI*SOWOOHIOIHHO 
SHADE *2 ,-=:+,- M — +=:>kxI* 

The first character is a blank. You may wish to devise 
your own character set or even make three or four passes 
over the printer to get more contrast. 

The importance of the number of shades of gray can be 
seen in Figure 1. The number of shades are 26, 6, and 2, 
respectively. The quality begins to degrade slowly. At 
two shades, we get kind of an outline. Not much 
improvement over 26 is seen if we go to 50 or even 100 
shades. 
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The second factor that influences picture quality is the 
pixel size. Much like the grain size used on different 
photographic film and paper changes its quality, 
smaller pixel sizes produce the better computer pictures. 
The pictures in Figure 2 show the effect of pixel size. The 
pixel sizes are 2, 4, and 8. Notice how the quality 
degrades rapidly beyond a pixel size of 2, and at 8, the 
image is essentially unrecognizable. 

At this point, I can introduce the program in Listing 1 
(PRINTIT). The data set for Abe (in Figure 3) contains 
64 rows and 64 columns of 26 shades of gray. Recognize 
that you are seeing the shade codes and not the actual 
shades. Horizontal and vertical "scale factors" (lines 
170 to 180) allow stretching and shrinking of the picture. 
These are needed to insure the proper proportions of the 
final picture since many printers print ten characters 
per inch horizontally and 6 lines per inch vertically. 
Pixel size and number of shades can also be varied by 
the user. 

Several points are noteworthy: 

1. A vertical scale factor of 6 (for example) causes the 
program to skip every sixth line of input (see line 170). 
This makes the picture narrower. Use zero for no skips. 

2. A horizontal scale factor of 1.25 will stretch the 64- 
character picture to 80 characters. Use 1 for no stretch. 

3. After the user selects the number of shades of gray, 
the program always selects the extremes. Thus, for two 
shades, the program will select CODE A and Z. For three 
shades, it will select A and Z with M. 

4. Pixel size variations are achieved by averaging the 
shades of adjacent parts of the picture. For example, if 
you pick a pixel size of 2, the program will average four 
points (two in each direction). If you select a pixel size of 
64, you will get a single solid gray picture which is the 
average of all 4096 points. 

5. You should recognize that if you scale, change the 
number of shades or pixel size, your run time will go up. 

6. As I mentioned above, you get shades by 
overprinting one picture onto another. After the first 
picture has been printed, the program will screen print 
REPOSITION PAPER AND <ENTER>. This is your 
cue to roll back the paper to the start of the first picture 
for overprinting of the second set of shades. When the 
second printing is complete, the REPOSITION will be 
shown again. Ignore this since you are done. 

You may wonder how to get the data set. The answer is 









Pictures 



"with considerable effort and patience." Virtually any 
picture can be "digitized." The key to good pictures with 
proper shading is to accurately read the gray shades 
from the master picture. The eye does not do it well, but 
you can get acceptable pictures by following the method 

described below. 

Divide the picture you're going to digitize into small 
squares by ruling it with horizontal and vertical lines. 
I've found that square sizes of about one tenth of an inch 
are about right for an 8" by 10" picture. That's 80 by 100 
squares instead of 64 by 64, so I pick the best part of the 
picture to actually "read." Next, establish what you 
think are the lightest and darkest squares. Call the light 
ones A and the dark ones Z. Now comes the hard part. 
Look at each square and judge its shade on this A to Z 
scale. I write the letter into the square so I can then load 
it into the data set. A 64 by 64 image takes over 4000 
readings and I find my eyeball can't distinguish subtle 
changes, so I use only six when I'm reading pictures this 
way. The six shade picture of Abe in Figure IB isn't too 



The program in Listing 2 (SETUP/MAN) is used to 
get the data onto disk or tape. I load the shade codes into 
DATA statements so I can use the EDIT commands to 
correct errors. After running this program, the data is on 
disk or tape and I can run PRINTIT. 

There is a better way. At my local electronics store, I 
found some small photoresistors. They cost about 50 
cents each and were so cheap that I bought several for 
later use. They had several sizes and I chose ones which 
were about l / SA in diameter. These are not the photo- 



transistors that are used in light pens. Phototransistors 
are either on or off, depending upon whether or not a 
threshold amount of light falls on the active elements. 
Photoresistors, when connected to an ohm-meter, 
measure continuous resistance depending upon the 
light level It is like your house dimmer switch rather 
than a light switch. This makes it ideal for sensing the 

shades of gray. 

Next, I had to find some way to convert the voltages 
read with the photoresistor to something the TRS-80 
could read. Several analog/digital converters are 
available, but I chose one by Alpha Products (called 
ANALOG-80*) because it had eight input ports 
(although I only needed one for this job) and was easy to 
use. Figure 4 shows how I wired the photoresistor to the 

A/D converter. 

Since I had some trial and error to get the right setting 
on the potentiometer (pot), I used the program in Listing 
3 (ADJUST) to help me adjust it. Each time the program 
says to POINT TO A BRIGHT SPOT, I do so and hit 
enter. It then says to POINT TO A DARK SPOT, and I 
do so. I can then make a slight adjustment in the pot. 
(Slight movements can make a surprisingly large 
difference.) Keep adjusting the pot until you get the 
biggest difference between the light and dark readings. 
The program prints this difference for you. Once the pot 
is set, you should not have to readjust it. It is important 
to note that changes in room light, the condition of the 
picture you are going to read, and other factors may 
force you to readjust once in awhile. 

The next step was to build a "reading" table. This is 
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Pictures 



shown in Figure 5 and uses a 35mm slide projector to 
project the image onto ground glass which has been 
ruled into one-tenth-inch squares. The glass was 
obtained from the local hardware store. Each square is 
then about the size of the photoresistor. You may have to 
move the projector toward, or away from, the mirror to 
make the projected picture fill the size of your ground 
glass reading table. You can use color slides, but I've 
found that black and white slides project and produce 
the best digitized pictures. 

The program in Listing 4 (SETUP/ AUT) does thejob. 
With the sensor in one hand and the other hand on the 
enter key, I move the sensor from square to square 
across the projected image a row at a time. I position the 
sensor over a square and hit enter, move the sensor to 
the next square and repeat this until an entire row of 
squares has been "read," The screen shows my progress 
and asks if the row is OK. If it is, hit "Y" and proceed to 
the next row. If you have made an error in moving the 
sensor or something else, hit "N" and the program will 
let you re-enter that row. It takes 4096 of these readings 
to get your 64 by 64 picture coded. After the entire picture 
has been read, the program asks for the filename to store 
the picture codes. Once this is entered, you can print the 
picture using PRINTIT as above. 

A few notes about this program are in order. The 
ANALOG-80 returns a number between zero and 255. 
My pictures use only 26 shades, so I need to convert the 



zero to 255, range to 26 shades, and put them into the 
string for the picture. This is done at line 240. Lines 220 
and 230 are required to activate ANALOG-80. It takes 
almost one and one-half hours to read in a picture. 

Tape users may want to combine ADJUST and 
SETUP /AUT. I chose to keep a separate copy since I can 
use it for other applications with my ANALOG-80, 

Incidentally, I have since found many other uses for 
the ANALOG-80 and consider it a good accessory to my 
system. For example, I use it to sense the outside 
temperature for my morning wakeup call. I also use it to 
read punched paper tape as an additional input device 
for my TRS-80. 

Depending on the camera setting used to produce the 
slide, the adjustments on your pot, the actual picture 
you're trying to do, and other factors, your first printer- 
generated picture may be disappointing. Some method 
is needed to salvage poor pictures. The most common 
way is to use a technique called "frequency spreading." 

As we look at a picture, we see that some shades 
appear more frequently than other shades. We can 
sometimes "enhance" the quality of a picture by redis- 
tributing the number of times each shade is used. Figure 
6 shows Abe with a distorted number of uses of some 
shades. Figure 7 is a "frequency distribution" of this 
shading. The abscissa is a shade number from 1 to the 
26, and the ordinate is the percent of the total elements 
(4096) that a particular shade was found. 
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/Ok v 

tANSFORM YOUR VISICALC™ FILES INTO 
GRAPHS ON YOUR TRS-8CT COMPUTER 





PRINTER 

GRAPHICS 

PROGRAM 

IGH-RESOLUTION CUSTOM 
D GRAPHICS PRINTER. 




C O R F> O RAT I Ol^l 

TOTAL = 51440.8 

PATENTS AND LICENSES (200) 
ACCOUNTS RECEIVABLE (4000) 7.£ 

CORPORATE BONDS (900) I . TA i 
INSURANCE PREPAID (300) .6V. \\ 

PREFERRED STOCK (500.2) IX.'.' 
AIRCRAFT LEASE (2000) 3.5 
SECURITIES ( 1000) 1 .97. 
TRUCKS (1288.65) 2 . 57. \ 
CAPITAL STOCK (395) . 87. s\. 

EQUIPMENT (3000) 5.87.- 



REAL ESTATE (5000) 9.77 



OFFICE BUILDINGS (12460) 24.2/ 



* HIGH RESOLUTION 
data Points/inch. 
CAPACITY - 1000 
Points per graph. 



- 60 « 72 

* LARGE DATA 

Input Data 

* SELECTABLE 



GRAPH SIZES - From 1 
x 24" * STANDARD DATA SOURCE - 
Plots Data from VISICALC or 
USERS OWN PROGRAMS using the 
DIF™ Standard Format. * GRAPH 
FEATURE SELECTION - Fill out 
Pre— formated Form on VISICALC 
screen or i n users own program. 
* MINIMAL ENTRY REQUIREMENTS - 
Enter only name o-f Datafile and 
location therein of data to be 
plotted. * MULTIPLE FUNCTION 
GRAPHS - Plots over 10 Data 
Sets per graph. * DATA SYMBOLS - PI 
symbol shapes. * DATA INTERPOLATION - connec 
composed line shapes. * LINE/SYMBOL LIBRARY 
with different line/symbol shape chosen fr 
CUSTOM LINES AND SYMBOLS - Has interactive 
for composing symbol shapes- * 
for ease of graph interpretation. 
GRID SELECTION - Prints selectabl 
grid lines. * CALENDAR SCALE - 
horizontal scale. * CURVE 
Fit, St;; 
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I • CURVE FITTING \ 
12 ROUTINE 



150 500 550 400 650 
WAVE LENGTH, NANOMETERS (NM) 



S • MULTIPLE GRID | 

\ LABELS 

J. NEGATIVE 

\ BAR GRAPHS 

J • OPTIONAL 

s PIE CHARTS 



PREPAID TAXES (1985) 
SUPPLIES (2000) 3.97 
■-U.S. BONDS (500) 17. 
x 0THER (300) .67 



WESTERN BIST, 

1ST QTR SftLES 

D. SMITH 




CENTRAL DiST. 

2ND QTR SALES 

D. HOWE 



WESTERN DIST. 
2ND QTR SALES 



$3495 

Available in COLOR 
On IDS Prism™ Printer: 
COLOR PLOT Version 



data with user composed 

ts data points with user 

Plots each Data Set 

12 line library. * 

creen-graphics program 

AUTO SCALING - Selects scale values 

User adjustable Mantissa Table. * 

e number of vertical and horizontal 

Optionally prints names of month on 

SELECTION - Can Mix Scatter, Line, Curve- 

tep, Bargraphs. Pie Charts. * OPTIONAL M1N/MAX VALUES - 



USER REQUIREMENTS 



Extends graph beyond the valu 
DESCRIPTIONS - Prints text desc 
legend. * TEXT ENTRYS - Prints 
graph. * USER FRIENDLY - Checks 



3 of the Data Sets. * DATA SET 
iptions of each Data Set in graph 
graph title, axis labels, and date on 
validity of input data and displays 



Users Manual with £ 
entry, composing li 



* COMPLETE DOCUMENTATION - Comprehensive 
samples covering data preparation, graph 
les and symbols, and technical notes. 



COMPUTER 

• TRS-80 MODEL I 48K 

<• TRS-80 MODEL III 48K 
° LNW80 48K 

DOS 

• TRSDOS 1.3, 2.3 

• NEVVDOS, NEWDOS/80 

• DOSPLUS 3.4, LDOS 5.1 
DISK DRIVES 

• SINGLE DRIVE (NOT TRSDOS) 

• DUAL DRIVE (PREFERRED) 



GRAPHICS PRINTER: 

• MX-80 GRAFTRAX, OR GT + 

• MX-100, FX 80/100 

• LP VIII, DMP 200-2100 

• NEC 8023 A-C, C.ITOH 8510 

• IDS 460/560, 480, 80/132 

• OKIDATA 82/83 (OKIGRAPH) 

OTHER VERSIONS IN DEVELOPMENT 



TO ORDER: Send check, purchase order, or request for COD shipment. Specify Computer 
and Printer Type. Include $2.50 for postage and handling. Calif, residents add 6% tax. 



dealer 1815 SMOKEWOOD AVE. • FULLERTON, CA 92631 • 



AJ1, INC. 

(714) 526-8435 



INQUIRIES 
WELCOME 



TRADEMARKS: DATAGRAPH (MICRO SOFTWARE SYSTEMS); VISICALC (VISICORP); TRS-80 (TANDY CORP); 
DIF (SOFTWARE ARTS INC ); PRISM (INTEGRAL DATA SYSTEMS) 



VISA/MASTERCARD IMaHwCorf] 
ACCEPTED 



Pictures 



For example, shade 9 was found about five percent of 
the time. We see considerable clustering around the 
middle shades. (In fact, I made an attempt to make it a 
statistically normal distribution for this demonstration 
of the technique.) When these percentages are 
accumulated across all shades, Figure 8 results. In other 
words, the percent of any one shade is added to the sum 
of all prior shades. For clarity, I connected a line across 
the top of the shades to the typical shape of the normal 
distribution. This addup is called the "normalized 
cumulative distribution," 

The enhancement process that seems to work the best 
is to make a "linear adjustment" where we redistribute 
the number of uses of each shade by a linear transfor- 
mation. The program in Listing 5 performs the 
adjustments (ENHANCE/LIN). 

Lines 150 to 200 read in the picture. Lines 210 to 310 
add up the number of times each shade is used. Lines 320 
to 350 calculate the percent of usage, and lines 400 to 420 
add up the cumulative distribution. Both the frequency 
distribution and cumulative distribution are linepr inter 
plotted using the subroutine at line 700. Lines 470 to 490 
refigure the linear redistribution and lines 500 to 610 
adjust the picture shade codes to the new distribution. 
The picture is saved in lines 620 to 670 and can be 
printed by PRINTIT as before. The enhanced picture 
that results from a linear transformation of Figure 6 is 
shown in Figure 9. It is not as good as that of Figure la, 
but considering that it was made from the rather poor 
picture of Figure 6, it's not too bad. 



This enhancement program makes the plots of the 
data before enhancement. If you want to see how the 
enhancement has altered the frequency and cumulative 
distributions, you have to rerun the program using as 
the input file, the previously saved. The resulting plots 
for Abe after linearization are shown in Figures 10 and 
11. One should not expect a perfect linear transfor- 
mation of discreet data, but the resulting cumulative 
plot does look pretty good. 

Several other enhancement techniques are available 
to bring out various parts of a picture. I particularly like 
the one which I call ENHANCE/EDG in Listing 6 since 
it finds the edge of a picture. Actually, it looks for places 
in the picture where the shade changes by a threshold 
value supplied by the user. Figure 12 is an edge picture of 
Abe from the data supplied in Figure 2. Lines 170 to 210 
read in the picture shade codes. Lines 310 to 450 pick off 
the shade under consideration and the four points 
around it. Line 470 redraws the picture shades into a 
different string array. Lines 540 to 590 save the picture 
in a file that can now be printed by PRINTIT. 

You can develop several other types of enhancement 
techniques. How about a full silhouette once you have 
the edge picture? You can also reverse the shades to get 
some interesting pictures. If you make pictures of tanks 
or ships, you might try to make a targeting method 
where you shoot at the most central part of the picture. 

To summarize, first take a black and white slide 
picture of your subject. Adjust the pot on your reading 
table. Then project the slide onto the ground glass and 
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Pictures 



read the picture using the analog-80 system and 
program setup /AUT. Print the picture using PRINTIT 
and examine your artwork. If you need to enhance it, use 
ENHANCE/LIN, or devise your own enhancement and 
reprint the enhanced picture using PRINTIT. 
Sometimes, I enhance a picture several times to get just 
the right shading or highlighting. 

Ed note: * Analog-80 sells for $139 and is available for 
Models I and III. The Model III version also requires a 
bus converter for an additional $39.95. For more 
information, contact Alpha Products, 79-04 Jamica 
Ave., Woodhaven, NY 11421, or phone (212) 296-5916. 

Figure 9 



Listing 1 - PRINTIT 

i0 • ***** PRINTIT ***** 

100 CLS 

110 CLEAR10000 

120 DIM SHADE$(2),P$(64) 

130 SHADE$(1)=" ..~==f+YY:I*SCWOOHIOIHH 

O" 

140 SHADE? (2)=" .- = +.- M~ +=:**I 

*«« 

150 CODE$=' 8 ABGDEK5HIJKU^OTORSTUVWKYZ n 

160 INPUT"ENTER PICTURE NAME";PN$ 

170 INPUT"ENTER VERTICAL SCALE FACTOR (6 

IS NORMAL) ";FV 
180 INPUT"ENTER HORIZONTAL SCALE FACTOR 
(1.25 IS NORMAL) ";FH 
190 MX=64*FH 
200 FH=1/FH 

210 INPUT"ENTER PIXEL SIZE"? PS 
220 INPUT"HOW MANY SHADES" ,-NS 
230 INPUT" POSITION PAPER AND <ENTER>";Z 
240 PRINT"*** READ AND VERT SCALE ***"; 
250 OPEN" I'M, PN$ 



260 FOR 1=1 TO 64 

270 PRINT@418, "ROW ";I 

280 IF FV=0 THEN 340 

290 IF INT(I/FV)*FV<>I THEN 340 ' 

EEP THIS ONE 

300 SK=SK+1' 

UMBER SKIPPED 

310 PRINT(a438,"SKIP";SK 

320 INPUT* 1, P$' 

KIP THIS ONE 

330 GOTO 350 ' 

ET NEXT ONE 

340 INPUT* 1, P$(I-SK)' 

HIS ONE'S OK 

350 NEXT I 

360 CLOSE 1 

370 MY=64-SK* 

UMBER OF ROWS 

380 PRINT" " 

390 P$=STRING$(MX," ")' 

AKE A BLANK LINE 

400 IF FH =1 THEN 520 

410 PRINT@448, "*** HORIZONTAL SCALING 

**«•. 



K 



N 



G 



T 



N 



M 



T 



420 FOR J=l TO MY' 
HERE ARE MY ROWS 
430 FOR K=l TO MX' 

THERE ARE MX COLUMNS 
440 PRINT@482,"ROW ";J;" COLUMN ";K 
450 KK=INT(K*FIi) ' 

SCALE IT 
460 IF KK<1 THEN KK=1' 

KEEP IT >1 
470 B$=MID$(P$(J),KK,l)' 

GET ONE CODE 
480 MID$(P$,K,1)=B$' 

PUT ITS CODE IN P$ 
490 NEXT K' 
NEXT COL 
500 P$(J)=P$ ! 

SAVE IN ARRAY 
510 NEXT J 1 
EXT ROW 

520 IF PS=1 THEN 690 

530 PRINT@512, "*** PIXEL SIZING ***"; 
540 FOR 1=1 TO MY-PS STEP PS' F 

OR EACH ROW 
550 FOR J=l TO MX-PS STEP PS' 

FOR EACH COLUMN 
560 PRINT@546,"ROW "; I; "COLUMN"; J; 
570 N=0 
580 FOR K=I TO PS+I-1 ' 

GET PIXEL ON EACH SIDE 
590 FOR L=J TO PS+J-1 
600 PRINT@500,L;K 

610 i^n+ascCmid^Cp^Ck)^,!))' 

ADD UP CODES 

August 1983 19 



N 
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620 NEXT L,K 
630 N=N/(PS*PS)' 

DIVIDE BY PIXEL [2 
640 FOR K=I TO PS+I-1' 

PUT BACK 
650 FOR L=J TO PS+J-1 ' 

INTO 
660 MID$(P$(K),L,1)=CHR$(N)' 

P$ 
670 NEXI 1 L,K,J,I ! 

DO REST 
680 ' * 

** PRINTING ROUTINE *** 

690 FOR 1=1 TO 2' T 

WO SHADES 
700 FOR J=l TO MY' 

MY ROWS 
710 FOR K=l TO MX' 
MX CHARACTERS 
7 20 N=INSTR( CODE$ , MID$ ( P$ ( J ) , K , 1 ) ) ' 

ITS NUMBER 
730 N=INT(26/(NS-l)*(IN r r(NS*N/26))+l) ' 

GREY SCALE 
740 IF N>26 THEN N=26' 

KEEP IT < 26 
750 MID$(P$,K,l)=MID$(SHADE$(l),N,l) 8 

PUT INTO OUTPUT LINE 
760 NEXT K' 

NEXT CHARACTER 
770 LPRINT P$ 
780 NEXTJ' 
NEXT ROW 
790 INPUT"REPOSITION PAPER AND <ENTER>"; 
X 

800 NEXT I' N 

EXT SHADE 
810 STOP 



Listing 2 - SETUP/MAN 

100 ****** SETUP/MAN ***** 

110 CLEAR 10000 

120 CLS 

130 INPUT n ENTER SAVE FILE NAME";FD$ 

140 OPEN "0",1,FD$ 

150 FOR 1=1 TO 64' SAVE 

64 ROWS 
160 READ A$' GE 

T ONE ROW 

170 PRINT A$' SH 

OW HUMAN 

180 PRINT #1,A$' SA 

VE IT 

190 NEXT I' DO RE 

ST OF 'EM 
200 DATA:' HERE IS 
210 DATAs' I PUT 
20 Basic Computing 



220 DATA?' 
230 DATA:' 



64 ROWS 
OF CODES 



Listing 3 - ADJUST 

100 '***** ADJUST ***** 

110 CLS 

120 PRINT@64, "POINT TO BRIGHT SPOT AND 

<ENTER>"; 

130 INPUT. 1 A$ 

140 OUT 0,1 

150 A=INP (0) 

160 PRINT@128, "POINT TO DARK SPOT AND <E 

NTER>"; 

170 INPUT A$ 

180 OUT 0,1 

190 B=INP(0) 

200 PRINT @ 192, "LIGHT = ";A,"DARK = "; 

B, "DIFFERENCE = ";B-A 

210 INPUT 1 "DO IT AGAIN <Y> OR <N>";A$ 

220 IF A$="N" THEN STOP 

230 INPUT "READJUST POT AND <ENTER> " ; A$ 
240 GOTO 110 

Listing 4 - SETUP/AUT 

100 '***** SETUP/AUT ***** 
1.10 CLEAR 10000 
120 DIM A$(64) 

130 CODE$="ABCDEFGHIJKLMNOPQRSTUVV\KYZ ,, 

140 FOR 1=1 TO 64' 

HERE COME THE ROWS 

150 CLS 

160 L$="" 

170 PRINT @ 320,. L$ 

180 PRINT @ SS/'ROW^";!; 

190 FOR J=l TO 64' 

AND THE CHARACTERS 

200 PRINT @ 119,"COI=";J; 

210 IF INKEY$=" "THEN 210 ' 

WAIT FOR INPUT 

220 OUT 0,1' 

GET ANALOG-80 READY 

230 A=INP(0)' 

GET ITS RESULT 

240 A=INT((A+5)/10) 

250 IF A<1 THEN A=l ' 

DON'T LET IT GET SMALL 

260 A$=MID$(CODE$,A,l)' 

GET THE LETTER 

270 L$=L$+A$' 

ADD IT TO STRING 

280 PRINT @ 320, L$; 

290 NEXT J' 

GET ANOTHER 

300 INPUT "<N> IF NOT OK ELSE <Y>";B$ 

310 IF B$="Y" THEN 330 



Pictures 



320 GOTO 150 ' 

TRY AGAIN 

330 A$(I)=L$' 

SAVE IT THEN 

340 NEXT I' 

NEXT ROW 

350 INPU r r n ENTER SAVE FILE NAME";FD$' WH 

ERE'S IT TO GO? 

360 OPEN "0",1,FD$ 

370 FOR 1=1 TO 64 

380 PRINT#l,A$(l)' 

SAVE IT 
390 NEXT I' 

FINISH UP 
400 CLOSE 



Listing 5 - ENHANCE/LIN 

100 '***** ENHANCE/LIN ***** 

110 MX=0 

120 CLS 

130 CLEAR 10000 

140 DIM A$(64),P$(26,50) 

150 INPUT"WHICH FILE IS TO BE WORKED ON" 

;FD$ 



160 OPEN 1 ' I'M ,FD$* 

OPEN IT 
170 FOR 1=1 TO 64' 

READ 
180 INPUT#1,A$(I)' 

IN 
190 NEXT I* 

PICTURE 
200 CLOSE 
210 DIM FC(26)' 
FREQ. COUNT FOR SHADES 
220 FOR 1=1 TO 64' 
DO ALL ROWS 
230 PRINT@192,"ROW "xl* 

PRINT ROW NUMBER 
240 PRINT@256,A$(l)x' 

PRINT ROW 
250 FOR J=l TO 64' 
DO ALL CHARACTERS 
260 A$=MID$(A$(I),J,1) B 

GET ONE CHARACTER 
270 A=ASC(A$)-64' 

GET ITS NUMERIC SHADE 
280 PRINT@319+J,CHR$(91)' 

MOVE THE ARROW 



For Hardware and Software Development 

MODEL LA-1 680 LOGIC ANALYZE 

ForTRS-80 Model I or III Computers (48K RAM) 



FEATURING . . . 

• Collection Of 1000 Data Samples On Each Of 16 Channels 

• Optionally Expandable To 64 Channels 

• User-Selectable Sampling Rates As Fast As 20 MHz 

• Easy To Specify Triggering & Collection Conditions 




> Timing Displays For Hardware Include: 

Standard 16 channel timing diagram 
Edge mode for transition identification 

• State Displays For Software Include: 

Dump in hex, binary, octal, decimal 
Instruction disassembly of microprocessors 
Map showing frequency of data samples 

» Plus . . . 

Histogram showing software performance 
Signature analysis of 14 points at once 
Correlate sample to reference memory 
Pattern search to aid data location 

Incredibly friendly 'help' displays 



The LA-1 680 Logic Anlayzer allows you to 
hook up to a high-speed digital circuit; define 
and collect the data you wish to examine; and 
then, produce a visual representation of the 
actual digital signals for closer inspection and 
analysis. This facilitates the design and ser- 
vice of computers, peripherals, and any 
equipment which contains digitial logic 
circuitry. 

The LA-1 680 Logic Analyzer contains the 
high-speed circuitry necessary to perform the 
time-critical functions of data recognition and 
collection. The TRS-80 microcomputer pro- 
vides for convenient keyboard entry of user 
commands, detailed display of data on 
screen or printer, and storage of test set-ups 
or displays on disk. 



This combination results in a powerful digi- 
tal tool, exhibiting features found only on 
today's most expensive, top-of-the-line logic 
analyzers. Yet, the affordable LA-1 680 is well 
within the reach of educators, hobbyists, and 
industry. 

LA-1 680 Logic Analyzer $1250.00 

High Impedance Probes 

(TTL or CMOS; 8 Channels) $275.00 

Model I Cable Adapter $95.00 

64 Channel Expansion Unit $1250.00 

Demonstration Disk $5.00 

OmniLogic, Inc. 

P.O. Box 87 
RENTON, WA 98057 

206/271-2000 
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290 FC(A)=FC(A)+1' 

ADD 1 TO THIS SHADE 
300 PRINTia319-KJ," "' 

REMOVE LAST ARROW 
310 NEXT J,I' 

DO REST OF PICTURE 
320 FOR 1=1 TO 26' 
SCALE 

330 FC(l)=FC(l)/4096' 

TO 
340 IF FC(l)>MX THEN MX=FC(l) ' 

(CHECK SCALE) 
350 NEXT I' 

FULL SIZE 
360 TT$="F REQUENCY PLOT" 
370 FX=250:FY=.005 
380 IF MX>.5 THEN FX=50; FY=.02' 
ADJUST FOR SCALING 
390 GOSUB 700 
400 FOR 1=1 TO 26' 
MAKE A 
410 FC(l)=FC(l)+FC(l-l)' 

RUNNING TOTAL 
420 NEXT I' 

OF FREQUENCIES 
430 TT$="C UMULATIVE PLOT' 
440 FX=50:FY=2 
450 GOSUB 700 
460 ' 

***** LINEAR ***** 
470 FOR 1=1 TO 26' 
ADJUST 
480 FC(l)=INT(FC(l)*26+.5)' 

THE 
490 NEXT I' 

FREQUENCY 
500 ' 

*** ADJUST PICTURE *** 
510 FOR 1=1 TO 64' 
DO EVERY ROW 
520 PRINT@192,"ROW ";I' 

SHOW HUMAN 
530 FOR J=l TO 64' 

DO EVERY CHARACTER 
540 PRINT@320, STRING? (64," ")' 

ERASE LAST ARROW 
550 PRINT@256,A$(I)' 

SHOW HUMAN 
560 A$=MLB$ {&${!), J ,1)* 

GEr ONE CHARACTER 
570 A=ASC(A$)-64' 

GET NUMERIC SHADE 
580 A=INT(FC(A))' 

ADJUSTED SHADE 

590 MID$(A$(l),J / l)=CHR$(A+64)» 

PUT IT BACK 
600 PRINT@319+J,CHR$(91)' 
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MOVE ARROW 

610 NEXT J, I' 

FINISH UP 

620 INPUT"ENTER SAVE FILE NAME";FD$ 

630 OPEN "0",1,FD$' 

OPEN SAVE FILE 

640 FOR 1=1 TO 64' 

DO EVERY ROW 

650 PRINT#1,A$(I)' 
SAVE IT 

660 NEXT I' 

FINISH UP 

670 CLOSE 

680 IF YN$="P" -THEN RUN "PICTURES" 

690 STOP 

700 LPRINT CHR$(12)' 

*** PLOT ROUTINE *** 

710 LPRINT " "s LPRINT" " 

720 LPRINT TAB(20);TT$* 

TITLE 

730 LPRINT TAB(25);FD$ 

740 LPRINT" ": LPRINT" " 

750 FOR 1=1 TO 26' 
CLEAR 

760 FOR J=l TO 50' 
OUT 

770 P$(I,J)=" "' 
PLOT 

780 NEXT J,I' 

SPACE 
790 FOR 1=1 TO 26' 
FILL 
800 IF FC(I)=0 THEN 840 ' 

(SKIP IF ZERO) 
810 FOR J=l TO FC(I)*FX' 

THE 
820 P$(l,j)=" *"' 

PLOT 
830 NEXT J 
840 NEXT I 
850 FOR J=50 TO 1 STEP-1 ' 

PRINT THE PLOr 
860 IF J=35 THEN LPRINT "PERCENT";* 

SCALE NAME 
870 IF INT(J/10)*10OJ THEN 890 
880 LPRINT TAB(7) USING "###.## ";J*FY; 

1 PRINT SCALE 

890 LPRINT TAB (15 );"-"; 

900 FOR 1=1 TO 26' 

THESE THREE 

910 LPRINT P$(I,J);' 

LINES PRINT 
920 NEXT I' 
THE PLOT 
930 IF J<>0 THEN LPRINT " " 
940 NEXT J 
950 LPRINT TAB(ll); n 
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In Texas Orders 

Questions & Answers 

1-713-392-0747 



INDUSTRIES, INC 

22511 Katy Freeway 
Katy (Houston) Texas 77450 



To Order 

1-800-231-3680 
800-231-3681 



* 



HARDWARE & SOFTWARE 



TRS-80® BY RADIO SHACK. Brand new in cartons delivered. Save state sales tax. Texas residents add only 3 fo sales tax 
Open Mon . -Fri . 9-6, Sat. 9- 1 . We puy height and insurance . Come by and see us . Call us for a reference in or near your city 
Ref: Farmers State Bank, Brookshire, Texas. 



WE OFFER ON 
REQUEST 



Federal Express (Overnight Delivery) 

Houston Intercontinental 
Airport Delivery (Same Day) 

U.P.S. BLUE (Every Day) 

References from people who have 
bought computers from us probably in 
your city. We have thousands of 
satisfied customers. WE WILL NOT BE 
UNDERSOLD! 








ED McMANUS 



See us every 



MasterCard 



X 



WE ALWAYS 
OFFER 

We accept Master Card, VISA, 
and American Express. 

We use Direct Freight Lines. No 
long waits. 

We always pjiy the freight and 
insurance 

Toll free order number 

Our capability to go to the gient 
TRS-80* Computer warehouse 5 
hours away, in Ft Worth, Texas, 
OR MORE to keep jwin stock. 

Tues. Wed. & Thurs. in the Wall Street Journal. JOE McMANUS 

Telex 77-4132 (FleksHou) 

* TRS BO if I Registered Trade mirk ct Tandy Corp 



No Tax on Out of Toxas Shipments! 




10% 15% 







i _ 
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960 LPRINT STRING? { 53/'+")' 
UT ON BOTTOM LINE 
970 LPRINT TAB(16); 
980 FOR 1=1 TO 26 STEP 2' 
HESE LINES 

990 LPRINT USING "## M ;I;' 
PUT ON 

1000 NEXT I' 

BOTTOM SCALE 
1010 LPRINT " " 

1020 LPRINT TAB(25) "SHADE NUMBER" 
1030 RETURN 



P 



T 



Listing 6 — ENHANCE/EDG 

100 ****** ENHANCE/EDG ***** 

110 CLS 

120 CLEAR 10000 

130 DIM A$(64) 

140 L1$=STRING$(64,"Z") 
150 L2$=L1$ 

160 INPUT" WHICH FILE IS TO BE WORKED ON" 

170 OPEN" I'M, FD$' 

OPEN IT 
180 FOR 1=1 TO 64' 

READ 
190 INFUT#l,A$(l)' 

IN 
200 NEXT I' 

PICTURE 
210 CLOSE 

220 INPUT"ENTER THE THRESHOLD VALUE (l T 
O 26)"?T 
230 CLS 

240 PRINT @ 183, "T=" ; STRING? (1,64-KT); 
260 SY=38/64' 
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SCALE TUBE PICTURE 

270 FOR 1=2 TO 63" 

DO ALL ROWS 

280 FOR J=2 TO 63 ' 

DO ALL CHARACTERS 

290 PRINT @ 55, "ROV^";!; 

300 PRINT @119, n COLF H ;Jr 

310 AS^D^ASUhJ,!) 1 

GET ONE CHARACTER 
320 X0=ASC(A$)-64' 
330 PRINT @ 380, A$; 

340 A$=MID$(A$(I),J+1 # 1) 1 

GET ONE ON RIGHT 
350 PRINT @ 382, A$; 
360 XR=ASC(A$)-64 
370 A$=MID$(A$(I),J-l,l) , 

GET ONE ON LEFT 
380 PRINT (§ 378, A§; 
390 XL=ASC(A$)-64 
400 A$=MID$(A$(I-1),J,1) 1 

GET ONE ABOVE 
410 PRINT @ 316, A$; 
420 XA=ASC(A$)-64 

430 A$=MID$(A$(I+1),J,1) , 
GET ONE BELOW 

440 PRINT @ 444, A$; 

450 XB=ASC(A$)-64 

s?="y" 

IF (X0>T AND XR<T) 
OR (X0<T AND XR>T) 

^T AND XL<T) 

CT AND XL>T) 

OR (X0>T mD XA<T) 

OR (X0<T AND XA>T) 

OR (X0>T AND XB<T) 

:T AND XB>T) 
THEN S§= I, Z":SET(I*SX, 
480 MID$(L1$,J,1)=S$' 

PUT INTO DUMM¥ PICTURE 
490 NEXT J' 

EXT CHARACTER 

500 A?(I-1)=L2$' 

COPY TO REAL PICTURE 

510 L2$=L1§' 

SAVE FOR NEXT TIME 

520 NEXT I' 



OR 
OR 






SY) 



N 



N 



530 PRINT @ 0," "; 

540 INPUT"EOTER SAVE FILE 

ERE'S IT TO GO? 

550 OPEN "0 , M,FD$+"/EDG 1 ' 
560 FORI=l TO 64 
570 PRINT#1,A$(I) ' 

SAVE IT 
580 NEXT I' 

FINISH UP 
590 CLOSE 



" ; FD$ ' WH 






...SO PRACTICAL.SO USEFUL IT BECOMES HERALDED BY COMPUTER OWNERS INTERNATION- 
ALLY AS A TRUE CLASSIC...AN INDUSTRY STANDARD...HIGHLY ACCLAIMED BY EVERY MAJOR 
TRS-80 PUBLICATION. YOU'VE SEEN IT WITH ONLY A HANDFUL OF TRS-80 PROGRAMS...NOW 
EXPERIENCE A LEGENO WITH THE HEW... 

VERSION 3.0 



UJS 







MANIPULATE DISK SECTORS, MEMORY 
AND FILES • COPY FILES FROM AND TO 
NON-COMPATIBLE DOSS • ZAP A DIREC- 
TORY • ZAP A SECTOR • COPY A SECTOR 
AND COMPARE A SECTOR • COMPARE 
FILES • PURGE A DIRECTORY • DISPLAY 
DISK MAPS • EXAMINE FILE LOCATIONS 
READ AN ALTER DATA ADDRESS MARKS 
DOUBLE SSDED DRIVE SUPPORT LDOS. 
DOSPLUS, AND MULTIDOS • MORE • 
BOOTS ON MOD i OR MOD 1!! 35. 40, OR 80 
TRACKS • SINGLE OR DOUBLE DENSITY • 
TEST MEMORY • READS ALL CURRENT 
POPULAR DOS'S:TRDOS, LDOS. 






NEWDOS, NEWDOS/80 2.0. DOSPLUS. 
MULTIDOS. DBLDOS • AUTO DENSITY 
RECOGNITION • AUTO DOUBLER 
: RECOGNITION * AUTO DOS RECOGNITION 

AUTO MODEL RECOGNITION MOD I OR 
MOD ill • REPAIR DAMAGED DIRECTORIES 
• REPAIR BOOT SECTORS • REPAIR HIT & 
GAT TABLES • CREATE A SPECIAL OR 
: 1st PLACE 80-SICRO 1982 CUSTOM FORMATTED DISK • REFORMAT 
UTILITY PROGRAM OF THE YEAR WITHOUT ERASE • BUILT IN PRINTER 

ROUTINES • SOFTWARE BULK ERASE A 
DISKETTE • PATCHES TRSDOS AT 
• protected media -OWNERS OPTION • EASILY CONFIGURED 

ack up copy included FOR ANY SYSTEM • MORE • 



THE PROGRAM W/MANUAL 79.95 • THE TECH MANUAL 1 4.95 «THE BOOK INSIDE SU+ 1 9.95 



jPOMIEIFg OOT 



A GRAPHICS BREAKTHROUGH! Now the ULTIMATE in 
graphics design and editing, PowerDOT is the state-of-the- 
art in HI-RES Dot Mappers Unmatched in quality and 
features, PowerDOT allows the user to create TRUE HI-RES 
printouts on the EPSON (Graftrax or Graftrax+ req .), or the 
C Itoh PROWRITER from Leading Edge without ANY hard- 
ware modifications! The program has the ability to create 
drawings several times larger than the computer screen 
You are only limited by disk storage Your screen is merely a 
"picture window" to a much larger drawing area You define 
the picture size You select the print mode, hi-res, lo-res, or 
ultra-res. A very versatile utility and truly ahead of its time 
Only $49.95. 




The most powerful, mailing system for the TRS80, Powermail is a 
highly sophisticated mass mailing system designed to run under 
all of the popular DOS's currently available for the Mod I or 1 1 1 The 
program is written entirely in machine language for maximum 
operation speed, and occupies only 4 K of the available RAM in 
your computer There are no slow periods when Powermail is 
running New features have been added to the program that 
others have always lacked You now have the ability to keep 
track of mailings using the 24 flags that are incorporated into the 
Powermail program The Powermail system will handle a file up to 
8 megabytes, or 65,535 names, whichever is smaller The 
program will run in as little as 32K and one disk drive, although 
48K and 2 drives are desirable The program will also sort the 
entire maximum file size and open up to 1 68 files simultaneously 
during the process. Only $99.95 



TOMORROW 



HERE 



TODAY 



A full screen graphics editor PowerDRAW allows the user to 
draw directly to the screen utilizing cursor controlled 
movement Graphics and text may be combined and saved 
directly to disk or tape, and recalled at a later time. The 
"SAVE" formats are CONDENSED TOKENS, EDAS SOU- 
RCE, EDTASM SOURCE, BASIC DATA STATEMENTS, 
BASICS STRINGS, BASIC ARRAYS, and LOAD FILE 
FORMAT. The files may be run alone or merged into any type 
of program or application. Animation is also possible when 
screens are sequenced Design custom forms, titles, pic- 
tures, and graphics for your applications Received EXCEL- 
LENT reviews in INFOWORLD 6/82, 80-US 1 0/82, and 80- 
MICRO 10/82 Three printer drivers are included, and the 
program is JOYSTICK compatible A GREAT value at only 
$39.95. 



New printer drivers for the new Radio Shack™ Superscripsit™ 
This new generation of custom printer drivers allows you to utilize 
all of SUPERSCRIPSITS features with your EPSON, PROWRITER 
and C ITOH F-10 STARWRITER printers. You can now utilize all 
of the printers custom features such as compressed, expanded 
and proportional print, underlining, boldface, superscripting, and 
sub-scripting. All drivers can be called from within SUPERSCRIP- 
SIT at "document open time" Order by printer designation as 
follows. Only $29.95 each 



POWERDRIVER E 
POWERDRIVER P. 
POWERDRIVER F 



EPSON MX70/80/100 

CITOH PROWRITER 

CITOH F-10 



Products from Breeze/QSD, inc. 



Available from Selected Dealers Everywhere 1 1 500 Stemmons Fwy., Suite 125 

Dallas, Texas 75229 

To order call toll free 1 -800-527-7432 

For product information (214) 484-2976 
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2,000 new programs for your 

TRS-80® 12. 

CP/M is the runaway 
leader in disk operating 
systems, but until now owners 
of Radio Shack computers 
have been locked out of the 
thousands of useful programs 
that operate on CP/M. 

Now you can put the power 
of CP/M into your Radio 
Shack TRS-80 II, 12, or 16, 
and be able to use all the 
popular and useful software — 
and hardware— that has been 
previously out of your reach. 

Use any printer. 
Instead of being chained to 
Radio Shack hardware, you'll 
be able to add a video terminal, 
any printer (serial or parallel) 
and several Winchester 
hard disk drives with storage 
up to 80 megabytes. 

Yes! Send me free information 



about CP/M for Radio Shack. 

Name 



Uses only 8.5 K of memory. 

Since our first version 
went on the market in 1980, 
we've condensed and refined it 
into a compact, easy-to-use 
system enjoyed by thousands 
of users. 

Besides the standard Digital 
Research CP/M manual, 
you'll get the 250-page manual 
we've developed through our 
long experience in adapting 
CP/M to Radio Shack com- 
puters. Our manual has lots 
of examples and an index 
and glossary. 

You'll have your first working 
disk in ten minutes. 

Only $200. 
The floppy disk version of 
Pickles & Trout CP/M is $200. 
The hard disk versions (for 
Tandy, Corvus, and Cameo) are 
$250, except for the multi-user 
Cameo, which is $400. 



Address 
City 



State. 



Zip 

Phone ____^ 

or send us your business card. 

Pickles & Trout®, P.O. Box 1206, Goleta, 
CA 93116 (805)685-4641 



TRS-80 "' Radio Shack/Tandy Corporation. CP/M* Digital Research. 
Pickles & Trout" Pickles & Trout. ©1983 Pickles & Trout 




Models I/Ill 

Jock Nines 
Tuscaloosa, AL 

Well, I'm ready to 
write my article. Let's 
see, load the word 
processor and , . . 
STOP! The printer is in 
the wrong print 
mode! I'm in DOS 
now, so first go to 
BASIC. Then LPRINT 
CHR$(27) for escape 
and then CHR$(. . . 
Now, where did I 
put that command 
code summary? 
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If this has ever happened to you, 
this program is what you need! The 
program in Listing 1 is designed to 
read a line of commands, interpret 
them into printer command codes 
and send them to the printer without 
having to leave DOS. 

Program Operation 

After entering and assembling the 
program in Listing 1, all you need to 
set the printer from DOS is type, 
PRINTER C8, and zap, the printer is 
set to condensed mode, eight lines 
per inch. Say you want to print a 
heading before doing a DIR P. Just 
type PRINTER "Directory as of 
3/1/82." "Games OA." and the 
printer will print it out right from 
DOS. The program in Listing 1 is 
written for a Radio Shack Line 
Printer VI, but the parameters can 
be easily changed to work with your 
printer. 

On entry, the program first checks 
the DOS input buffer located at 
4318H for a space immediately 
following the command. This space 
must be present to separate the 
command from the parameters for 
the printer. If no space is present the 
program exits via the DOS error 
routine at 4409H setting the error to 
PARAMETER ERROR. The 
parameter list need contain no 
spaces, as the portion that sets the 
parameters into the print buffer will 
ignore any spaces or characters that 
are not valid parameters. 

Upon finding the required space 
the program then converts the 
parameter list into printer 
commands and stores them in a 
print buffer. 

C sets the printer to condensed 



mode. X clears the condensed mode. 
E starts the elongated print and Z 
clears the elongated mode. 2 sets the 
vertical spacing to 12 lines per inch. 
6 sets the vertical spacing to six lines 
per inch. 8 sets the vertical spacing 
to eight lines per inch. 

When a " is encountered the 
program then stores all characters 
following the " into the print buffer 
until a second ", an ENTER (ODH) 
character or a BREAK (01) 
character is encountered. This 
means that the command PRINTER 
"PRINT THIS <CR>, is perfectly 



legal and the string PRINT THIS 
will be sent to the printer. All strings 
printed from this program will be in 
uppercase because the DOS 
command decoder first goes through 
the input buffer and converts all 
lowercase characters to uppercase. 

There are two parameters not 
associated with the printer 
operation that the program 
recognizes. The first is the M 
parameter. When the M is 
encountered the only action that is 
taken immediately is the flag at line 



Program Listing for Printer /Command 







00100 


Pr inter /Cmd 


Ver 1.6 








00200 


Sets 


the pr 


inter according 


to the following parameters: 






00300 , 




C 


Sets printer to 


condensed mode 






00400 




X 


Clears condensed mode 






00500 , 




E 


Starts elongated mode 






00600 




2 


Ends elongated i 


Trade 






00700 , 




2 


Sets printer to 


12 lines per inch 






00800 




8 


Sets printer to 


8 lines per inch 






00900 




6 


Sets printer to 


6 lines per inch 






01000 




II „.,.,,„., 


Will print all 


characters until the next 






01100 , 






", 01 (break) or 0D (enter) 






01200 




M 


Clears memory from 5200 to HIMEM 






01300 




D 


Adds interupt routine to display date 






01400 










4318 




01500 I 


X)SBUP 


EQU 


4318H 


;DOS Command buffer 


5200 




01600 




ORG 


5200H 


;First user memory area 


5200 


00 


01700 


?LAG 


DEFB 





; Clear memory flag 


5201 


211843 


01800 i 


START 


LD 


HL,D0SBUF 


; Point to command area 


5204 


114C53 


01900 




LD 


DE,PBUF 


; Print buffer area 


5207 


3E20 


02000 


_OOP 


LD 


A,20H 


; Space 


5209 


BE 


02100 




CP 


(HL) 


;Is character a space 


520A 


28 0F 


02200 




JR 


Z,C0NT 


;Go if it is 


520C 


3E0D 


02300 




LD 


A,0DH 


;Is character a CR 


520E 


BE 


02400 




CP 


(HL) 


; Check character 


520F 


CA1453 


02500 




JP 


Z, ERROR 


;CR shouldn't be here 


5212 


3E01 


02600 




LD 


A,01H 


; Break 


5214 


BE 


02700 




CP 


(HL) 


; Check character 


5215 


CA1453 


02800 




JP 


Z, ERROR 


; Break shouldn't be here 


5218 


23 


02900 




INC 


HL 


;Go to next character 


5219 


18EC 


03000 




JR 


LOOP 


; Check until match found 


521B 


23 


03100 


CONT 


INC 


HL 


; Point to next character 


52 1C 


7E 


03200 




LD 


A, (HL) 


;Get the character 


521D 


FE0D 


03300 




CP 


0DH 


; Command end marker (CR) 


521F 


CAA652 


03400 




JP 


Z,EXIT 


;A11 done so exit 
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ow. . . fro 
the master 
difficult si 



Dr. David Lien, 
of making the 
pie, comes the 




Face it. Until you can talk to and 
understand your Model I, II, III or 
16 Tandy TRS-80* it's nothing 
more than a mass of microcir- 
cuits in a plastic box. 

You need help to harness your 
TRS-80 and make it work for you . 
And that's just what you get from 
Learning TRS-80 BASIC. 

Written by David Lien, author of the popu- 
lar TRS-80 User's Manual for Level 1, Learning Level II and The 
BASIC Handbook, Learning TRS-80 BASIC is at once entertaining, 
informative and easy to understand. It's the perfect guide to 
entering the world of microcomputers. 

In Learning TRS-80 BASIC, David Lien gives you simple, step- 
by-step instructions, including programs you can use in business 
or home finance, for entertainment, or to help troubleshoot prob- 
lems. You'll even learn to write your own custom software. Ideal for 
the classroom, too. 

Included are short Question and Answer sections which help 
make sure you understand everything you've learned — it's almost 
like a correspondence course . . . without the correspondence! 

No matter if you own the Model I, II, III or 16, Learning TRS-80 
BASIC is one book no TRS-80 owner should be without. 

Available at better computer and 
book stores, 

or call (800)854-6505 

In California (619) 588-0996 

Ask about the Basic Handbook, too. To 
order by mail, send check or money 
order for $19.95 (California residents 
add 6%), plus $1.65 shipping and hand- 
ling. Overseas orders send $19.95 plus 
$2.50 surface shipping and handling. 
All books have a 30-day money-back 
guarantee — you can't lose. 





535 Broadway, Dept. 130883, El Cajon, CA 92021 

TRS-80 is a registered trademark of the Tandy Corporation 
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1800 is set. When the program is 
ready to exit, this flag will be 
checked. 

The second parameter not 
associated with the printer is the D 
parameter. The D parameter causes 
the short routine at line 18100 to be 
relocated from the current HIMEM 
down. HIMEM is then reset to 
protect the new routine and it is then 
inserted into the interrupt chain. 
The routine is very short (11 bytes), 
and causes the date to be displayed 
in the upper right hand corner of the 
screen, directly below the time. 

DOS Calls 

The operating system I am using 
is NEWDOS/80 version 2. The 
NEWDOS/80 version 2 manual 
gives many of the calls needed to 
fully utilize the operating system. I 
have used the calls to 4410H, 4409H 
and 4470H as well as the exit to 
402DH. 

The call to 4410H inserts a user 
routine into the interrupt chain. The 
requirements are that the DE 
register pair contain the starting 
address of the routine to be inserted. 
The routine must begin with two 
bytes of zeros to be used by DOS as a 
forward chain pointer. The third 
byte of the routine is the number of 
interrupts to pass between 
executions of this routine. The 
fourth byte is the count of interrupts 
and initially must be non-zero. 

The call to 4409H will display the 
error corresponding to the error code 
in the A register. If bit 7 of the A 
register is this routine will exit to 
402DH. If bit 7 of the A register is 1 
the routine will return to the caller. 

The call to 4470H converts the 
date to MM/DD/YY format. The HL 
register pair must point an 8-byte 
area where the converted date will 
be stored. In this program I point HL 
at the screen position where I want 
the date displayed. The jump to 
402DH is the exit to DOS READY. 

When the program is through with 
the command line, it jumps to EXIT 
at line 9500. The last bit of 
housekeeping is done here. 

The end of the print buffer is 
marked with a zero byte. Then a call 
is made to the printer routine at line 
12000 and the print buffer is sent to 
the printer. 

On return to the EXIT routine the 
flag at line 1800 is checked. If the 



Command 



flag at line 1800 is set, the program 
then falls through to CLMEM at line 
10100. CLMEM moves the short 
section (22 bytes) CLM down to 
5200H and then jumps to that 
routine. 

Once CLM is relocated it loads the 
HIMEM value at 4049H into the HL 
register pair. Using this value as the 
upper limit, CLM clears all memory 
from 5200H+22 to HIMEM. 

At first glance, those of you who 
are using NEWDOS/80 version 2, 
may say that the DOS command 
CLEAR will do the same thing, and 
it will . . . almost. 

The CLEAR command clears all 
memory from 5200H to FFFFH, 
purges the interrupt chain and 
clears all ROUTing. The parameters 
for the CLEAR command may 
selectively clear memory from a 
starting address to an ending 
address but your ROUTing is still 
purged. PRINTER M does none of 
this and leaves routines in high 
memory alone. 

Conversion 

To convert the print commands to 
suit your printer will require some 
simple revision of the program. The 
interpretation of the parameter list 
for the printer starts at line 4200 and 
continues through line 8600. 

To change a command character 
from C for condensed to S for small, 
find the line that compares that 
character (line 4200) and change the 
CtoS. 

To change the codes that will be 
sent to the printer, first find that 
command (i.e., line 4200). Then, if 
the code you wish to insert is the 
same number of bytes as the present 
code, simply change the value to be 
loaded into the A register (i.e., line 
4400). 

If the number of bytes for the con- 
trol code are greater than the num- 
ber of bytes already in the sequence, 
then insert the code: 

LD A.value 

CALL LOAD 

between the last call to LOAD (i.e., 

line 4700) and the jump relative to 

CONT (i.e., line 4800). 

With a few changes to the 
program, you can set your printer to 
any of its print modes directly from 
DOS and save the annoyance of 
having to go to BASIC to set the 
printer. 



5222 FE01 


03500 


CP 


01H 


5224 CAA652 


03600 


JP 


Z,EXIT 


5227 FE22 


03700 


CP 


■ ii i 


5229 CCF052 


03800 


CALL 


Z, STRING 


522C FE44 


03900 


CP 


•D" 


522E CC1953 


04000 


CALL 


Z, BEGIN 


5231 FE43 


04100 


CP 


'C 


5233 200C 


04200 


JR 


NZ,C0NT1 


5235 3E1B 


04300 


LD 


A,1BH 


5237 CDA352 


04400 


CALL 


LOAD 


523A 3E0E 


04500 


LD 


A f 0EH 


52 3C CDA352 


04600 


CALL 


LOAD 


523F 18DA 


04700 


JR 


CONT 


5241 FE58 


04800 C0NT1 


CP 


'X' 


5243 200C 


04900 


JR 


NZ,C0NT2 


5245 3E1B 


05000 


LD 


A,1BH 


5247 CDA352 


05100 


CALL 


LOAD 


524A 3E0F 


05200 


LD 


A,0FH 


524C CDA352 


05300 


CALL 


LOAD 


524F 28CA 


05400 


JR 


Z,C0NT 


5251 FE5A 


05500 C0NT2 


CP 


•Z' 


5253 2007 


05600 


JR 


NZ,C0NT3 


5255 3E1E 


05700 


LD 


A,1EH 


5257 CDA352 


05800 


CALL 


LOAD 


525A 18BF 


05900 


JR 


CONT 


525C FE45 


06000 C0NT3 


CP 


'E' 


525E 2007 


06100 


JR 


NZ,C0NT4 


5260 3E1F 


06200 


LD 


A,1FH 


5262 CDA352 


06300 


CALL 


LOAD 


5265 18B4 


06400 


JR 


CONT 


5267 FE32 


06500 C0NT4 


CP 


*2' 


5269 200C 


06600 


JR 


NZ,CONT5 


526B 3E1B 


06700 


LD 


A,1BH 


526D CDA352 


06800 


CALL 


LOAD 


5270 3E1C 


06900 


LD 


A,1CH 


5272 CDA352 


07000 


CALL 


LOAD 


5275 18A4 


07100 


JR 


CONT 


5277 FE36 


07200 CONT5 


CP 


'6' 


5279 200C 


07300 


JR 


NZ,C0NT6 


527B 3E1B 


07400 


LD 


A,1BH 


527D CDA352 


07500 


CALL 


LOAD 


5280 3E36 


07600 


LD 


A,36H 


5282 CDA352 


07700 


CALL 


LOAD 


5285 1894 


07800 


JR 


CONT 


5287 FE38 


07900 CONT6 


CP 


•8' 


5289 200C 


08000 


JR 


NZ,C0NT7 


528B 3E1B 


08100 


LD 


A,1BH 


528D COA352 


08200 


CALL 


LOAD 


5290 3E38 


08300 


LD 


A,38H 


5292 CDA352 


08400 


CALL 


LOAD 


5295 1884 


08500 


JR 


CONT 


5297 FE4D 


08600 C0NT7 


CP 


•M' 


5299 2080 


08700 


JR 


NZ,CONT 


529B 3E01 


08800 


LD 


A,l 


529D 320052 


08900 


LD 


(FLAG) ,A 


52A0 C31B52 


09000 


JP 


CONT 


52A3 12 


09100 LOAD 


LD 


(DE) ,A 


52A4 13 


09200 


INC 


DE 


52A5 C9 


09300 


RET 




52A6 3E00 


09400 EXIT 


LD 


A,0 


52A8 CDA352 


09500 


CALL 


LOAD 


52AB CDDB52 


09600 


CALL 


PRINT 


52AE 3A0052 


09700 


LD 


A, (FLAG) 


52B1 FE00 


09800 


CP 





52B3 CA2D40 


09900 


JP 


Z,402DH 


52B6 110052 


10000 CLMEM 


LD 


DE,5200H 


52B9 21C452 


10100 


LD 


HL,CLM 


52BC 011600 


10200 


LD 


BC,ENDCLM-CLM 


52BF EDB0 


10300 


LDIR 




52C1 C30052 


10400 


JP 


5200H 


52C4 2A4940 


10500 CLM 


LD 


HL,(4049H) 


52C7 111652 


10600 


LD 


DE,ENDCLM-CLM 


52CA AF 


10700 


XOR 


A 


52CB ED52 


10800 


SBC 


HL,DE 


52CD E5 


10900 


PUSH 


HL 


52CE CI 


11000 


POP 


BC 


52CF D5 


11100 


PUSH 


DE 


52D0 El 


11200 


POP 


HL 



Can also be end marker 
All done so exit 
Literal string print 
Go to string-print 
Date flag 
Add date to chain 
Condensed mode flag 
Go if no match 
Escape character 
Put in print buffer 
Condense command 
Put in print buffer 
Go for next character 
End condensed mode flag 
Go if no match 
Escape character 
Put in print buffer 
End condense character 
Put in print buffer 
Go for next character 
Cancel elongated mode 
Go if no match 
Cancel elongate mode 
Put- in buffer 
Go for next character 
Start elongate mode 
Go if no match 
Start elongate code 
Put in buffer 
Go for next character 

12 lines/inch 
Go if no match 
Escape code required 
Put in buffer 

12 lines/inch mode 

Put in buffer 

Next character 

6 lines/ inch mode 
Go if no match 

Escape code required 

Put in buffer 

6 lines/inch mode 

Put in buffer 

Next character 

8 lines/inch 

Go if no match 

Escape code required 

Put in buffer 

8 lines/inch mode 

Put in buffer 

Next character 

Clear memory 

Go if no match 

Clear flag on 

Set flag on 

Go for next character 

Store chr. in buffer 

Bump buffer pointer 

Back to caller 

Buffer end marker 

Store in buffer 

Send buffer to printer 

Check for clear memory 

Is flag off 

Yes — return to DOS 

Move routine to 5200H 
Point to routine 

Figure number to move 

Move routine to 5200H 

Go to routine 

Get Himem location 

; Do some math 

;Clear carry flag 

; Figure #/bytes to clear 

;Move HL 

; to BC (#/bytes/clear) 

; Start is moved to HL 

;HL now has start 
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TYPITALL 

The SCRIPSIT" Compatible Word Processor 
TYPITALL is a new word processing pro- 
gram which is upward compatible with 
SCRIPSIT™ for the Model 1 and 3 TRS-80. 
TYPITALL includes features like these: as- 
sign any sequence of keystrokes to a single 
control key. See the formatted text on the 
screen before printing. Send the formatted 
text to a disk file for later printing. Merge 
data from a file while printing. Send any 
control or graphic character to the printer. 
Use the same version on the Model 1 or 3. 
Reenter the program with all text intact if 
you accidentally exit without saving text. 
TYPITALL (disk only) $129.95 

SYSTEM DIAGNOSTIC 

Complete diagnostic tests for every 
component of your TRS-80 Model 1 or 3. 
ROM: checksum test. RAM: three separate 
tests. Video Display: character generator, 
video RAM, video signal. Keyboard: every 
key contact tested. Line printer: character 
test. Cassette Recorder: read, write, verify. 
RS-232-C Interface: connector fault, trans- 
mission, framing, data loop, baud rate gen- 
erator. Disk Drives: controller, read data, 
formatting, read/write/verify with/without 
erasing, disk drive timer, disk head cleaner. 
System Diagnostic $99.95 

TRS-80 MODEL 111 
ASSEMBLY LANGUAGE 

A complete course in assembly language, 
written for the beginner. Basic concepts, 
the Z-80 instruction set, complete Model 
III ROM and RAM information, program- 
ming examples, the disk controller, the 
TRSDOS 1.3 disk operating system, 
RS-232-C interface. 

With the book you can also purchase 
Monitor #5, a comprehensive machine 
language monitor (specify Model 1 or 3). 

Book only $1 6.95 

Book and Monitor #5 on disk $29.95 

SMART TERMINAL 

The intelligent terminal program, with 
automatic transmission and storage of data, 
true BREAK key, cassette and disk files 
compatible with SCRIPSIT™ and Electric 
Pencil™. Same program supports both cas- 
sette and disk systems. 

Model 1 or 3 version $74.95 

Model 2/12 (CP/M) Version $79.95 

SMALL BUSINESS 
ACCOUNTING 

Based on Dome Bookkeeping Record 
#612, this program keeps track of income, 
expenses, and payroll (not included in 
cassette version) for a small business. 

Model 1/3/4 disk version $59.95 

Model 1/3/4 cassette version $29.95 

Model 2/12 or IBM/PC version $69.95 

HOME BUDGET 

Analyzes your income and expenses, 
computes monthly and year-to-date sum- 
maries including tax deductions. 

Model 1/3/4 disk version $49.95 

Model 1/3/4 cassette version $29.95 

Model 2/12 or IBM/PC version $59.95 

FREE Software Catalogue 

Add $3.00 postage & handling. 
New York residents add sales tax. 

Howe Software 

14 Lexington Road 
New City, NY 10956 

(914) 634-1821 

Visa and MasterCard accepted. 

"TRS-80 is a trademark of Tandy Corp. 
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Command 



ENDCLM 

PRINT 

PRINT1 



L00P2 



STRING 



STR1 



52D1 13 11300 

52D2 3E00 11400 

52D4 77 11500 

52D5 EDB0 11600 

52D7 C32D40 11700 

52DA 00 11800 

52DB 214C53 11900 

52DE 7E 12000 

52DF FE00 12100 

52E1 C8 12200 

52E2 D9 12300 

52E3 21E837 12400 

52E6 56 12500 

52E7 CB7A 12600 

52E9 20FB 12700 

52EB 77 12800 

52EC D9 12900 

52ED 23 13000 

52EE 18EE 13100 

52F0 23 13200 

52F1 7E 13300 

52F2 FE0D 13400 

52F4 281D 13500 

52F6 FE01 13600 

52F8 2819 13700 

52FA 7E 13800 

52FB FE0D 13900 

52FD 280E 14000 

52FF FE01 14100 

5301 280A 14200 

5303 FE22 14300 

5305 2806 14400 

5307 CDA352 14500 

530A 23 14600 

530B 18ED 14700 

530D 3E0D 14800 

530F CDA352 14900 

5312 C9 15000 

5313 CI 15100 

5314 3E2F 15200 
5316 C30944 15300 
4470 15400 
4410 15500 
4049 15600 

5319 F5 15700 
531A C5 15800 
531B D5 15900 
531C E5 16000 
531D 2A4940 16100 

5320 110B00 16200 

5323 AF 16300 

5324 ED52 16400 

5326 2B 16500 

5327 224940 16600 
532A 23 16700 
532B EB 16800 
532C 010B00 16900 
532F 214153 17000 
5332 EDB0 17100 
5334 ED5B4940 17200 

5338 13 17300 

5339 CD1044 17400 
533C El 17500 
533D Dl 17600 
533E CI 17700 
533F Fl 17800 

5340 C9 17900 

5341 0000 18000 START1 

5343 28 18100 

5344 01 18200 

5345 21753C 18300 
5348 CD7044 18400 
534B C9 18500 
534C 18600 LAST 
534C 50 18700 PBUF 
5201 18800 
00000 TOTAL ERRORS 



OUT 



ERRSTR 
ERROR 

DATE 
ADTASK 
HIMEM 
BEGIN 



INC 

LD 

LD 

LDIR 

JP 

NOP 

LD 

LD 

CP 

RET 

EXX 

LD 

LD 

BIT 

JR 

LD 

EXX 

INC 

JR 

INC 

LD 

CP 

JR 

CP 

JR 

LD 

CP 

JR 

CP 

JR 

CP 

JR 

CALL 

INC 

JR 

LD 

CALL 

RET 

POP 

LD 

JP 

EQU 

EQU 

EQU 

PUSH 

PUSH 

PUSH 

PUSH 

LD 

LD 

XOR 

SBC 

DEC 

LD 

INC 

EX 

LD 

LD 

LDIR 

LD 

INC 

CALL 

POP 

POP 

POP 

POP 

RET 

DEFW 

DEFB 

DEFB 

LD 

CALL 

RET 

EQU 

DEFM 

END 



DE 
A,0 
(HL) ,A 

402DH 

HL,PBUF 
A, (HL) 



HL,37E8H 
D, (HL) 
7,D 

NZ,L00P2 
(HL) ,A 

HL 

PRINT1 

HL 

A, (HL) 

0DH 

Z, ERRSTR 

01H 

Z, ERRSTR 

A, (HL) 

0DH 

Z,0UT 

01H 

Z,0UT 

! II t 

Z,0UT 

LOAD 

HL 

STR1 

A,0DH 

LOAD 

BC 
A,2FH 

4409H 

4470H 

4410H 

4049H 

AF 

BC 

DE 

HL 

HL, (HIMEM) 

DE,LAST-START1 

A 

HL,DE 

HL 

(HIMEM) ,HL 

HL 

DE,HL 

BC, LAST-START 1 

HL,START1 

DE, (HIMEM) 

DE 

ADTASK 

HL 

DE 

BC 

AF 



40 

1 

HL,3C75H 

DATE 



•Print buffer he 

START 



;DE now has destination 

Fill byte 

Fill source byte 

Clear mem (5200 - Himem) 

Return to DOS 

Spot end of CLM 

Point to print buffer 

Get a character 

Check for end marker 
Go if end found 

Use alternate registers 

Point to printer port 

Get port status 

Check for ready status 

Not ready, try again 

Ready, send character 

Back to normal registers 

Bump buffer pointer 

Go for another character 

Bump command pointer 

Get a character 

Check for error 

Go if parameter error 

Check for BREAK 

Go if parameter error 

Get character 

Check for cr 

Go if match 

Check for BREAK 

Go if match 

End string marker 

Go if match 

Put character in buffer 

Bump pointer 

Go for next character 

Put a carriage return. 

into the print buffer 
Back to main program 
Adjust the stack (RET) 
Code for parameter error 
DOS error exit (dead end) 
Dos Date converter 
Ad to interupt chain 
Dos high memory pointer 
Save A and Flags 
Save Byte counter 
Save Destination pointer 
Save Source pointer 
Get high pointer 
Legnth of routine 
Clear carry 
New himem address+1 
HL now has himem 
Store it 

Start of routine 
Set up the destination 
Length of routine 
Point to begining 
Move it in 
Get start -1 
DE now has start 
Into interupt chain 
Get Source pointer 
Get Destination pointer 
Get Byte counter 
Get A and Flags 
Return to main program 
Forward chain pointer 
Execute on 10th interupt 
Interupt count 
Point to screen posit 
Convert & display 
Back to foreground task 

re' 
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QUEST - A NEW IDEA IN ADVENTURE 
GAMES! Different from all the others. 
Quest is played on a computer generated 
map of Alesia. Your job is to gather men 
and supplies by combat, bargaining, explor- 
ation of ruins and temples and outright 
banditry. When your force is strong enough, 
you attack the Citadel of Moorlock in a 
life or death battle to the finish. Playable 
in 2 to 5 hours, this one is different every 
time. TRS-80 Color, and Sinclair, 13K VIC- 
20. Extended BASIC required for TRS-80 
Color and TI99/A. $14.95 each. 

32K TRS 80 COLOR Version $24.95. 

Adds a second level with dungeons and 
more Questing. 




WIZARDS TOWER - This is very similar to 
Quest (see above). We added wizards, magic, 
dragons, and dungeons to come up with a 
Quest with a D&D flavor. It requires 16k 
extended color BASIC. 13k VIC, Commo- 
dore 64, TRS-80 16k Extended BASIC, 
TI99/A extended BASIC. $14.95 Tape, 
$19.95 Disk. 

Authors — Aardvark pays the highest com- 
missions in the industry and gives programs 
the widest possible advertising coverage. 
Send a Self Addressed Stamped Envelope 
for our Authors Information Package. 
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ZEUS — It's fast and furious as you become 
the WIZARD fighting off the Thurderbolts 
of an angry ZEUS. Your Cone of Cold will 
destroy a thunderbolt and your shield will 
protect you — for a while. This is the best 
and highest speed arcade action we have 
ever done. Difficulty increases in wave after 
wave, providing hours of challenging fun 
and a game that you may never completely 
master. Commodore 64, Vic20 (16k ex- 
pander), and 16k TRS-80 Color Computer. 
(ALL MACHINE CODE!) 
$19.95 tape $24.95 disk. (Tape will not 
transfer to disk 
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SEAWOLFE - ALL MACHINE CODE In 
this high speed arcade game, you lay out 
patterns of torpedoes ahead of the attacking 
PT boats. Requires Joysticks, at least 13k 
RAM, and fast reflexes. Lots of Color and 
Sound. A fun game. Tape or Disk for Vic20, 
Commodore 64, and TRS-80 Color. NOTE: 
tape will not transfer to disk! 
$19.95 Tape -$24.95 Disk. 




ADVENTURES!!! 
The Adventures below are written in BASIC, 
are full featured, fast action, full plotted ad- 
ventures that take 30-50 hours to play. (Ad- 
ventures are interactive fantasies. It's like 
reading a book except that you are the main 
character as you give the computer, com- 
mands like "Look in the Coffin" and "Light 
the torch.") 

Adventuring requires 16k on Sinclair, 
and TRS-80 Color. They require 8k on OSI 
and 13k on VIC-20. Now available for TI99. 
Any Commodore 64. 

$14.95 Tape - $19.95 Disk. 

ESCAPE FROM MARS 
(by Rodger Olsen) 
This ADVENTURE takes place on the RED 
PLANET. You'll have to explore a Martian 
city and deal with possibly hostile aliens to 
survive this one. A good first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVENTURE. 
It is a treasure hunt in a pyramid full of 
problems. Exciting and tough ! 



imgeoiu?' <v ' 



Dungeons of Death - This is the first D&D 
type game good enough to qualify at Aard- 
vark. This is serious D&D that allows 1 to 6 
players to go on a Dragon Hunting, Monster 
Killing, Dungeon Exploring Quest. Played 
on an on-screen map, you get a choice of 
race and character (Human, Dwarf, Soldier, 
Wizard, etc.), a chance to grow from game 
to game, and a 15 page manual. 16k Ex- 
tended TRS-80 Color, 13k VIC, Commo- 
dore 64. At the normal price for an Adven- 
ture (14.95 tape, $19.95 disk), this is a give- 
away. 

Dealers — We have a line of about 100 origi- 
nal programs for the machines listed here. 
We have High speed Arcades, Quality Ad- 
ventures, Word processors and Business 
Software for Small machines. Better yet, 
we have excellent Dealer support. Phone for 
information. 



Send $1.00 for Complete Catalogue - Please specify system on all orders - $2.00 Shipping Charge on each order 



, Commerce, Walled Lake, Ml 48088 / (313) 669-311 
one Orders Accepted 8:00 a.m. to 4:00 p.m. EST. Mon.-Fri. 
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The Epson MX-80 is the best-selling dot 
matrix impact printer in the world. It has 
been since its introduction. And despite the 
host of imitators it spawned, no one has 
been able to top it. Until now. 

FX-80: Son of a legend. 

The new Epson FX-80 is far more than just 
doo-dads added on to last year's model. It's 
the most astonishing collection of features 
ever assembled in a personal printer. 

For starters, it's fast: 160 CPS. And clean. 
All the print quality Epson is famous for in a 
tack- sharp 9x9 matrix. 

But that hardly scratches the surface. 
Create your own alphabet. 
With the new FX-80, you aren't limited to 
ASCII characters. You can create your own. 
Any character or symbol that can be defined 
in a 9x11 matrix can be added to the FX-80's 
already impressive library of type styles and 
stored in its integral 2K RAM. 

So you can create "Sally's Gothic" or 
"Tom's Roman" just by downloading and 
modifying standard characters. Or you can 
create a custom set from scratch. Either way, 
you can store up to 256 new characters. And 
if you don't need a new alphabet, the RAM 
functions as a 2K data input buffer. 
Who knows graphics better than Epson? 
Nobody, that's who. And if you don't 
believe it, witness the FX-80. 

With a 12K ROM capacity, the FX-80 gives 
you a few things the others don't. For exam- 
ple, not one, not two, but seven different dot 
addressable graphic modes are program 



selectable. And can be mixed in the same 
print line. Everything from 72 DPI (dots- 
per-inch) Plotter Graphics to the 640 dots 
per line resolution designed to match the 
remarkable monitor clarity of the Epson 
QX-10 personal computer. 

And that is in addition to an astonishing 
array of 136 different user-selectable type 
styles including Proportional, Elite and Italic 
as well as the more conventional faces you 
get on other printers. 

Hard-to-beat hardware. 
The FX-80 has all the hardware features 
you've come to know and love on the MX 
Series: logic seeking, bidirectional printing, 
the by-now-famous disposable printhead, 
and more. 

The FX-80 features an adjustable pin 
platen or optional friction /tractor feed, so 
you can use fanfold, roll or sheet paper . . . 
backwards or forwards. The FX-80 even 
gives you reverse paper feed. 

And if you're printing forms, the FX-80 
has a feature you're gonna love: a function 
that allows you to tear off the paper within 
one inch of the last print position. 

Be the first on your block. 
We'd be willing to bet that the FX-80 — like 
the MX-80 — will have its share of imitators. 
Don't be fooled. To make sure you get the 
genuine article, rush down to your local 
computer store right now and let them show 
you everything the FX-80 can do. 

And while you're there . . . ask them to 
show you how it works with our computers. 





EPSON AMERICA, INC. 

COMPUTER PRODUCTS DIVISION 

3415 Kashiwa Street 
Torrance, California 90505 
(213)539-9140. 
Outside California, phone 
(800) 421-5426 for the 
Epson dealer nearest you. 
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Patrick Morgan, Los Angeles, CA 



My sons became interested in word search puzzles 
recently and I thought it would be great fun if they could 
make up their own puzzles. This seemed a perfect job for 
a computer. I saw a word search program some time ago, 
but had forgotten where. I looked through all the com- 
puter magazines I had, but couldn't find anything. I 
decided to write a program with the features I wanted. 

This program creates a word search puzzle within 
several cartoon outlines of a 60 by 40 block. Because of 
its size, it is a rather difficult puzzle to solve. I, therefore, 
made provisions for an answer printout. 

Since this type of program has a lot of dead time while 
creating matrices or placing words, I added indicators at 
several points to give the progress of the puzzle. These 
add very little time, but make it much more interesting, 
especially for children. It gives a feeling that the 
computer is doing something. 

I ran this program for my son's class with each child's 
name hidden. Unfortunately, each child wanted his own 
copy and this got a little out of hand. 

Program Details 

First of all, note the CLEAR 5500 statement. This is 
because the program creates two 60 by 40 matrices plus a 
lot of other strings. The program won't fit into a 16K 
machine in this form, but it can easily be trimmed to fit. 
If you have the memory, why not use it? 

First, the words are entered. A full matrix of this size 
can easily handle 50, or more, 10-letter words. The upper 
limit of 75 words was arbitrarily selected. The cartoons 
cut down the available word locations by about a third, 
so the capacity would be less. If more than 40 words are 
entered, I added a sort routine so that the longest words 
are placed first. This cuts down on the number of tries 
needed to place a word. Each pass through the sort is 
listed on the screen. 

The next step is to create the 40 by 60 matrix in string 
memory. If the block was chosen, the matrix is created 
by ordinary nested FOR . . . NEXT loops. If a cartoon 
34 Basic Computing 



was chosen, the procedure is a little more complicated 
and is covered in another section. This matrix is initially 
filled with dashes or spaces. I spent quite a bit of time 
trying to find a quick way of creating and filling the 
matrix with an assembly language subroutine, but I 
couldn't get the BASIC pointers to work. 

When this matrix is finished, the program starts to fill 
it with words. Line 420 gets a random starting point (A 
and B) and a direction (D). Each direction has its own 
subroutine. The location is tested to see if there is enough 
room for the word and that it doesn't interfere with 
another word. If it is not okay, the program returns for a 
new starting point and direction. If it still won't fit after 
100 tries, the word is skipped. The word, and the number 
of tries, is shown at the top of the screen so that you can 
follow along. 

When all of the words are placed, a new matrix is 
created in which all words are located in the same place, 
but the dashes are replaced with random letters. The 
first matrix is kept as the answer and is printed on 
request. The second matrix is puzzle. If you are trying to 
conserve memory, skip the second matrix and fill the 
first with random letters. 

The program, as it stands, is pretty well protected 
from a young user's standpoint. A non-number for 
"number of words" will cause a "redo" error message. 
The words may include numbers or punctuation, but a 
comma will cause an "extra ignored" error. This won't 
interfere with the run. The input will accept a word of up 
to 255 characters. This won't fit, of course, but no harm 
is done. These errors are easy to trap if you feel it 
necessary. 

Cartoon Outline 

The cartoon is created in lines 310 through 360 and the 
DATA statements. The procedure looks confusing, but is 
actually relatively straightforward. The DATA state- 
ments are alternately the number of spaces and dashes 
for each line. Each line must start with a space, but can 
end with either a space or a dash. I added a space in the 
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-DICTIONARY- 



CTEZADXVQKEDXLICNEPC 
WGQLZLFSHZOYZYLSYDPVUDJTORKEVC 
FQNJTCAAANLERVFBYYCFIQGQJLAERUTQTXHH 
XAADSZWCICQTDOXGZRUHETYLAJYQWKJDGFLLEHCO 
WYKZXIMEGLRRXJPNNIEOXHYQGLOUKDCURENSFEEFDG 
HRTQIUIDUWRKODEFZNEETZZQKPMGCNOBPWGSBYN 
YCFVFIPBG FHRDYN ANPCOLEBHJRLX 
DBLOSPF SOCGPNCEECAMTTNJWHFECWJ 
YRU OBTDRGWYPGTHIGQHBMVXDSSQGPY 

HFZFCOAMAFNBVPNTNEZLKZSPLKCZDHTD 
JFFBGQFPAABIOJTCROAUTGJXFTTTUEWIDFF 
QDUEZPERHVFIJOGNFNFOCQMXDDYAMNTZNBDVTQ 
TIEQEWEMNIYRADIOSHACKTGRMMXLORXQKDCTDHKW 
MNJHKEATACUXDTENIHCAMFLWRETOUVXNWUZTICDHQS 



OHFDF 
QHER 
FQIO 
DGBJ 
BDAMN 



RXYXZJQYS8 0US J0URNALAUQMATUCHXXCU8H 
TCEJORPXGSNWEQTAYMMHDSLPIDNHNZIDEZZE 
V MCURURIAKYVCTFOVMULKNQHPGLITMINJRVJ 
YX CFGECFZKMQUMZHMKORlowercaseTPEHUIRI 
KN NCYCECAFRETNIMONITORNSWICFEGQBRDXULR 
QYHJINOWZJURZRBNYPCYSTGYAGXBCUAMYPGPNXADYTGNSTF 
VSZKMGRAGVELECTRICITYWXGZSGBSKRCEATSPMECKCGIDHG 
AYRNGLDCQMILQVVRWGFNXSCNLOWKBUQIRNAELFUGSSCRDW Z 

NSBLZEEARJGSEIGTEHWPLAVRNCOBOLTJBRUREKOQRAIZU US 

EPSRCJRHAYZLETBQZTDTNLPLANGUAGEHLNEZPTAZGXPD KPJHC 

LMEHAKTCRUYKBHNTINWEXPIZVEPDNEMPTJZQFMXNAAZ QHHPGQKUHS 
YMMQPGFKIJUQKZTHIELVHJPEFIYPQIUTCDKJIBDOEDICTIONARYGN 
TPBSMYOADPLIEVMFWRYETLHIXGUARWHJNZUAQCYPUMIIODZML 
ILLJNOBJCGONZLEYFPZPIBESKNWRBBX NTHYEBJ 
YXYWJPTKPSJVQKKNHRRHFCYIEQTYMDEC 

SAHQGOKRETUPMOCPBTOUKPMXRKTZDZGNYKMOVPTDQPVOGOWLCXSQ 
OTMOGOARKBELZMVFTNYYOPPZEZCVXKLELJOVQOJJXYNAQWDUCX 
BACJBXTNRONQFKYTEZIBFORTRANTCUXNDDXYX 
OJYAZDNZOHYXOYBSGTXVZWQODCXNKPDY 
DLERMIREPAPTNYFFH 
PAEMBNYXZMEGRJZIJ 

BMQEOCPHABRQQXH 

YBOORTBBYLOKKYTHU 

IDQBRTNNAZIGWXZBYJELC 

VNJNGQFGEFTLVXIXVADGBJOQ 

OZALKIPUDXYOSWFEOMJQVIXULOZ 



THE FOLLOWING WORDS ARE HIDDEN — 

RADIOSHACK SOUS JOURNAL COMPUTER 

COBOL PASCAL COMMUNICATIONS 

TYPEWRITER INTERCONTENENTAL 

PROGRAMMER INTERFACE PRINTER 

MACHINE lowercase GRAPHICS 

PAPER DICTIONARY FLUORESCENT 



BASIC 


FORTRAN 


TELEPHONE 


PENCIL 


ASSEMBLY 


LANGUAGE 


MONITOR 


DISKDRIVE 


RECORDER 


PROJECT 


ELECTRICITY 


THE END 



DATA statements to mark the end of each line. These 
are optional, but they make it easier to find locations. As 
each value is read, H alternates between 1 and 0. When it 
is 0, spaces are printed, otherwise dashes are printed. V 
is the line length. When V gets to 61, it is reset to 1 and a 
new line is started. J is the line counter. You now have 
the matrix filled with spaces or dashes. Words and 
random letters will replace the dashes as described 
above. 

To get to the second cartoon, the first set of data is read 
and discarded until a 70 is reached. This doesn't seem 
very elegant, but it is quick and easy. You are now ready 



to create the second cartoon as described above. Only 
2 are shown in this program, but there is no reason you 
can't add more of your own. 

Creating a Cartoon 

The easiest way is to first run this program and get a 
60 by 40 block puzzle printed. Now, draw your picture 
directly on this puzzle, observing the discrete letter 
positions. The rest is easy, but tedious. I suggest using a 
10-character-per-inch printer and a ruler marked in 
tenths of an inch. Remember that the far left column 
must be a space. Write your DATA statements with the 
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STATEMENT- 



QDLDIDQZKWB 
H0EAOVDLPEAVWCVAY 
XHQQAWZIMINIFLOPPYFQ 
NEAHHJSOPZKOSUUUTTMAYD 
AZJNWJZKHDSJREZTCIWRHC 
T8JJPIISGJUFQGLJKYBBHMV 
FSKSEXRBOJQWKFMOJIFIEPR 
ITIDJEBVYTICIRTCELEGYZ 
ISFMSKHLKAEBKOENSUVPKD 
BZWSLLDLURRSBOFBJGYAY 
SNOITACINUMMOCZHPCI 



MDYOELDBKGX 
GUFBLOTIDKTGTIMOH 
JTETLMJCNNJMQPCUENEU 
RTTJRHATJFETFOLXJUSVM 
HKDHQCTIGYPDCEXJJXYVCSI 
HQLKHZ08UOEWHKSRORPWDDFDZ 
MYTWVTZH0UTJCCOEFUQSXNUKU 
LWCYXVQWKUKHOAPMRABVHUVT 
NBCNZGWIPFSJEPWK0OCDTAV 
CHKHKLUHSU H RVYWUEZV HUHCCSLBFO 
DIWDNACRYEQJQEIMVDLU MUQCGOKA 
MHMEDWLZSTVOVNNWEXFVKCUYWHIBYVYWSYCesacrewolDENNAECNPBK 
RPYFOSFPUUPDTYYYOKRVBZHFLLVEYXINEYLBMESSAQCZWNNCO 
BUEUHIRRDPEAYLJOKTPRHIFTTZEYCTRTQPSSJXENDJ 
FKTXOYXNBVRNHIMKARXSXSHECZNBZGSNGMSFPSOXCQ 
LTPUALGGUWPLAMSCRBSRKLJYTOZLQSTRETIRWEPYTIYHEFQYJ 
WOERIARLSIARQLOMXEGRHZYFUOXEAVPKJZCYWCZNEXECEXRENF 
STRACOADYGBHFSGDCQTTXTHZIDMGPOZRECORDERIBSOZDNAGTNIO 
HXZJNGMJERLYLHAQ UAMBNVREHMWUK WKQRLSYNBVRLUWG 
PVQHETOOIELPYNUX PLYBHWAOYPT DZBRSOILIDZYXLN 
UWCPQETUAHCDUOAD PMGFITANFEX WOWWIEAEWSTPMIGK 
YJENRSWZFBMTCTRQ ATOMTXWEIZB GPPTWUBFKHBLDOUU 
RQXBCKRYLSZPCOPJQD DSLECDJLKKEWA DAZCNNUQWGOZJCXTM 
JYZRWWGZLNNSHNKBBCVVJYGSCHWDNOJGRUTXDDMWBOKIEGGLECHIQHDGDP 
GBSSJNSOLVKNTTFIUJGHQXREAJEEBNOSYQMXWYATWQDSUQFAFEKAOCWPLT 
CWBNDUMXBTDFTJGNZZEPTVDLQBOXQFNIROTSOLTCBGALKGVHELMBNIYCD 
PHXUQCNOWIVNZZZNCRLRJEPQCHXPPTLVNSXGKTZGGJJRBGLLAZXOECMS 
OX^NSHTVPSJEDTLUQDHAAKHXOLTOFXWOISSLEPQEZAZNVYTHAFAPTPR 
JONIMDYRKBN VDHNQRHYLAGLBZOEHTICANLAX JLYBUMGZBJR 
ZRBAHROEDKT FPXDAKTXSEG IHCBHMOOG IPIVH EAMDKTVZJKK 
SKLRPDEP.UAZ LMFVTWSAWOHWOFRXTURU GMZSKEHCFH 
NONTJAINLB WENIHCAMHLQTJTK RADIOSHACK 
XEPTRFVDHWIE SRHWA YUWRREMRDCV 

ZABOOEJEXEGHJ IBZABPBTGADC 

HKIFLOUWOOYR AXDXGCGGWTYAS 

OLUATERWYHNTNDRO STATEMENTJGQBABLP 
JKUJDCTGARQTZIBSNKHRQUZDQVWJNHAFHRZJ 
WUTSZOGAJZQWJNRYMPHCPNINAEAFCKU 
NTJ LFTZOLRMYNRNRDUZARMC 
BDICYTYWFKLDIW 



THE FOLLOWING 

RADIOSHACK 

FORTRAN 

PENCIL 

PROGRAMMER 

MONITOR 

DICTIONARY 



ORDS ARE HIDDEN -- 
COMPUTER 
PASCAL 
TYPEWRITER 
INTERFACE 
DISKDRIVE 
ELECTRICITY 



80US JOURNAL 

ASSEMBLY 

TELEPHONE 

PRINTER 

MACHINE 

FLUORESCENT 



BASIC 

LAUNGUAGE 

STATEMENT 



COBOL 

COMMUNICATIONS 
CONTINENTAL 
GRAPHICS 
PROJECT 
THE END 
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number of spaces and dashes like I did and change lines 
180 and 270 to allow the new cartoon. The DATA state- 
ments take so little room that you could easily offer a 
choice of 10 or more outlines. 

Hints and Options 

The size of this puzzle makes it quite difficult to solve. 
There are several ways to make the words easier to find. 
One way is to enter a letter or the whole word in lower- 
case. Just hold the shift key down. Another way is to add 
a space or punctuation after the word. I had planned to 
offer a 30 by 40 format with a space after each letter, but 
the cartoons looked terrible. Give this program a little 
thought and you can think up several ways to customize 
it for your own needs. 

Color Computer Conversions 

Divide all PRINT@ values by 2, change all LPRINT 
commands to PRINTM-2, and delete in line 130: 
DEFINT A-Z. Leave the rest of line 130 as is. 

Program Listing for Word Find 

100 ' WORDFIND/BAS — 06/10/82 

110 CLSsPRINT@88/'W O R D F I N D"sPRINT 

:PRINT"THIS PROGRAM WILL CREATE A WORD S 

EARCH PUZZLE" 

120 PRINT" IN A 60 BY 40 MATRIX, A MAXIM 

UM OF 75 WORDS MAY BE HIDDEN. 

130 CLEAR5500SDIM A$ (61,40) ,B$(60,40),W$ 

(75): DEFINT A-Z 

140 PRINT sINPUT"HOW MANY WORDS (75 MAX) 

";N 

150 IF N>75 OR N<3 THEN 140 

160 FOR I=1TO N 

170 PRINT "WORD # ";I?" IS ";: INPUT 

W$(l):NEXT 

180 PRINT"PUZZLE TO BEs (1) MICKEY MO 

USE"; PRINT. 1 TAB(17)"(2) DONALD DUCK"sPRIN 

T TAB(17)"(3) BLOCK ";sINPUT"CH 

OICE ";V 

190 IF V<10R V>3 THEN 180 

200 IF N<40 THEN 260 

210 CLSsPRINTs PRINT "SORTING NOW, SORT 

# - "; 
220 FOR J=l TO N-2sFOR I=lTO N-l 
230 IF LEN(W$(I)) >=LEN(W$(I+1)) THEN 25 


240 W§(0)=^(I):W?(I)^W§(I+1):W$(I+1)^W$ 

(0) 

250 NEXTI:PRINTJ;:NEXTJ 

260 PRINT sPRINT"CREATING MATRIX NOW, RO 

W — "; 

270 ON V GOTO 310,300,280 

280 FOR J=lTO 40s FOR I=lTO 60 

290 A$(l,j)="-"sNEXTIsPRINT J; : NEXT J: GOT 

O 370 

300 READ U:IF U<70 THEN 300 

310 FOR J=l TO 40 

320 H=0sV=l 
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330 READ Us IF H=l THEN 350 

340 FOR I=V TO V+UsA$(l,j)=" 1! sNEXTIsH=l 

sV=V+UsGCTO 360 

350 FOR I=V TO VH-UsA$(l,j)="-' l sNEXTIsH=0 
sV=V+U 

360 IF V<61 THEN 330 ELSE PRINT J; s NEXT 

J 

370 CLSs.I=0 

380 1=1+1 s IF I=N+1 THEN 920 

390 Z=LEN(W$(I)) sC=0 

400 PRINT@0, "PLACING ";W$(l); n "sPR 

INT(§40, "TRIAL "; 

410 C=C+ls PRINT@47,C;sIF 099 THEN PRIN 

T:PRINT@130, "CAN'T PLACE ";W$(I) sGOT03 

80 

420 A=RND(60)sB=RND(40)sD=RND(8) 

430 ON D GOTO 440,500,560,620,680,740,80 

0,860 

440 IF A+Z>59 THEN 410 

450 FOR J=0 TO Z-l 

460 IF A$(A+J f B)<>"-"THEN 410 

470 NEXTs FOR J=0 TO Z-l 

480 A$(A+J,B)=MID$(W$(I),J+1,1) 

490 NEXTJsGOTO380 

500 IF A+Z>59 ORB+Z>39TIiEN410 

510 FOR J=0 TO Z-l 

520 IF A$(A+J,BKr)o"-"THEN410 

530 NEXTs FOR J=0 TO Z-l 

540 A$(A+J,BhJ)=MID$(W$(l),J+l,l) 

550 NEXTJsGOTO380 

560 IF B+Z>39 THEN410 

570 FOR J=0 TO Z-l 

580 IF A$(A,B+J)<>"~"THEN410 

590 NEXT s FOR J=0 TO Z-l 

600 A$(A,B+J)=MID$(W$(I),J+1,1) 

610 NEXrJsGOrO380 

620 IF A-Z<1 OR B+Z>39 THEN410 

630 FOR J=0 TO Z-l 

640 IF A$(A-J,B+J)O"-"THEN410 

650 NEXTs FOR J=0 TO Z-l 

660 A$(A-J,B+J)=MID$(W$(I),J+1,1) 

670 NEXTJSGOTO380 

680 IF A-Z<1 THEN410 

690 FOR J=0 TO Z-l 

700 IF A$(A-J,B)O"-"THEN410 

710 NEXTsFOR J=0 TO Z-l 

720 A$(A-J,B)=MID$(W$(l),J+l,l) 

730 NEXTJsGOTO380 

740 IF A-Z<1 OR B-Z<1 THEN410 

750 FOR J=0 TO Z-l 

760 IF A$(A-J,B-J)o"-"THEN410 

770 NEXTsFOR J=0 TO Z-l 

780 A$(A-J,B-J)=MID$(W$(I),J+1,1) 

790 NEXTJsGOTO380 

800 IF B-Z>1 THEN410 

810 FOR J=0 TO Z-l 

820 IF A$(A,B-J)o"-"THEN410 
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830 NEXT: FOR J=0 TO Z-l 

840 A$(A,B-J)=^ID$(W$(l),J+l,l) 

850 NEXTJsGOTO380 

860 IF A+Z>60 OR B-Z<1 THEN410 

870 FOR J=0 TOZr-1 

880 IF A$(A+J,Br-j)<>' , ~ ,, THEN410 

890 NEXT? FOR J=0 TO Z-l 

900 A$(A+J,&-j)=MID$(W$(l),J+l,l) 

910 NEXTJ:GOTO380 

920 PRINT@0, "FILLING IN MATRIX WITH RAND 

OM LETTERS, ROW -- ",-sFOR J=lTO40sFOR 1= 

1TO60 

930 IFA$(I,J)="™"THENB$(I,J)=CHR$(64+RND 

(26))ELSE B$(I,J)=A$(I,J) 

940 NEXTI:PRINTJ;:NEXTJ 

950 PRINT :INPUT"PRESS <ENTER> WHEN PRINT 

ER IS READY" ;Q$ 

960 FORJ=lTO40sFORI=lTO59;LPRINT B$(I,J) 

;:NEXTI:LPRINT B$(60, J) sNEXTJ 

970 LPRIN r I , :LPRINT ,, THE FOLLOWING WORDS AR 

E HIDDEN 

980 FOR I=1T0 N STEP5 : LPRINT W$(l),W$(l+ 

1),W$(I+2),W$(I+3),W$(I+4):NEXT 

990 INPUT" DO YOU WANT THE ANSWER (Y OR N 

)";Q$:IF Q$<> ,, Y"THEN END 

1000 FORJ=l TO40;FORI=1TO59;LPRIOTA$(I,J 

); :NEXTI:LPRINTA$(60,J) :NEXTJ 



1010 DATA 8 # H,25,11,5, 5,17,18,17,3, 4, 
20,14,20,2, 3,21,13,22,1, 2,23,12,22,1 
1020 DATA 1,25,11,23, 1,25,11,23, 1,24,1 
3,22, 1,23,14,22, 2,21,3,10,3,21, 2,20,5 
,8,5,19,1, 3,55,2, 6,49,5 
1030 DATA 9,42,9, 10,42,8, 6,49,5, 6,50, 
4, 5,52,3, 4,16,5,13,5,15,2, 3,16,7,11,7 
,15,1, 3,16,7,11,7,16, 3,16,7,11,7,16 
1040 DATA 2,18,5,13,5,17, 2,58, 2,58, 3, 
57, 4,56, 4,55,1, 5,11,3,25,3,11,2, 5,11 
,3,25,3,11,2, 6,11,5,20,5,10,3 
1050 DATA 7,10,7,15,7,10,4, 7,12,10,5,10 
,11,5, 8,13,21,12,6, 10,13,17,13,7, 12,1 
6,7,17,8, 14,36,10, 16,31,13, 20,23,17, 
24,14,22 

1060 DATA 70,18,20,22, 13,30,17, 12,36,1 
2, 9,40,11, 6,42,12, 4,39,17, 2,9,7,20,2 
2, 3,7,7,23,20, 5,3,7,27,18 
1070 DATA 12,32,16, 10,35,15, 8,38,14, 6 
,40,14, 5,42,13, 5,36,2,5,12, 4,36,4,4,1 
2, 1,1,2,35,6,4,11, 1,2,1,35,6,4,11 
1080 DATA 1,2,1,36,4,5,11, 1,47,12, 1,47 
,12, 1,46,12,1, 1,45,12,2, 1,44,10,5, 2, 
43,5,10, 4,53,3, 4,49,7, 5,31,4,7,13 
1090 DATA 6,32,22, 8,52, 10,50, 12,37,11 
, 13,32,15, 18,17,25, 18,17,25, 19,15,26 
, 18,17,25, 16,21,23, 15,24,21, 14,27,19 




The Grafyx Solution® for your Business 




Powerful Graphics. BlZGRflPH is o 
self-prompting business graphing pro- 
gram designed to ujork exclusively with 
Grafyx Solution. Micro-Labs' Grafyx 
Solution is a plug-in, dip on board ujhich 
gives you 98,304 points in a 512 x 192 
matrix. That's sixteen times as many 
points as a standard Model IIS! Improve 
your business with clear, accurate 
graphs. Perfect for managers, small 
businessmen and analysts. The BlZ- 
GRflPH package can display Line Graph, 



Bar Chart, Pie Chart, Area Plot, 
Histogram Plot, and Scatter Plot. Data 
can be entered from the keyboard or 
disk files - including VisiCalc®. 

Quality GrafyH. Select graph type, 
enter data or file name, select options, 
and a graph is quickly displayed in 
amazingly fine detail. Multiple data sets 
can be combined on one graph. Another 
unique feature is the ability to display the 
hi-res screen along ujith the normal text 
and louu-res screen. 

Versatile GrafyH. BlZGRflPH is a 
flexible program providing automatic 





labeling of X and V axis points using 85 
characters/line. Forecasting future trends 
is possible using line fitting, quadratic, 
and third order linear regression 
analysis. Data smoothing using moving 
averages is also possible. The finished 
graph can be saved on disk or printed 
on any of 20 popular printers. 

The Grafyx Solution package is shipped 
from stock and includes the board, 44 
programs, and a 54 page manual all for 
$299.95. The BlZGRflPH program, 
sample graphs, and manual is $98. 
Shipping is free on pre-paid or COD 
orders. (Tx. res. add 5% soles tax.) 

©VisiCalc/Registered TWl VisiCorp 

Micro-Labs, Inc. 214-235-0915 

902 Pinecrest, Richardson, Texas 75080 
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Call or Write 
Your Nearest 



MICRO-80 

284 Goodwood Road 
Clarence Park 
Adelaide South Australia 
Ph-(08) 2117224 

DIGI-TEK SYSTEMS 
65 Thornridge Circle 
Kitchener Ontario N2M-4V9 
Ph-(519) 742-8205 

STRAWFLOWER ELECTRONICS 
50 North Cabriilo 
Half Moon Bay 
California 94019 
Ph-(415) 726-9128 

COMPUTER MAG!C 
115 Wiltshire Avenue 
Louisviiie, Kentucky 40207 
Ph-(502) 893-9334 

E-C DATA 
Tornevangsvej 88 
P.O.B. 116 
DK-3460 

Birkerod, Denmark 
Ph +45/2/81/8191 

SYSTEM SOFT 
49, Dunvegan Drive 
Rise Park 

Nottingham, England 
NG5 5Dx 
Ph-(0602) 275559 

CUSTOM COMPUTING 
104 Bushwick Rd. 
Poughkeepsie, NY 12603 
Ph-(914)-47i-93i8 

AEROCOMP 
Redbird Airport 
Hanger 8 

Dallas, Texas 75232 
Ph-(214) 339-5104 



■ 



Snappware knows your programming time is valuable. That's why we are 
offering a trial package that will cut your programming time up to 75%! 

This 1 unprecedented offer allows you to judge for yourself the value of our 
software using your hardware at your convenience. Our five best sellirr 
products. EXTENDED BASiC, EXTENDED BUILT IN FUNCTIONS, COLLFG 
EDUCATED GARBAGE COLLECTOR, AUTOMAP and AUTOFILE, are an 
available to you on a trial basis for only $50.00 for the Model II and 
$35.00 for the Model III. We're convinced that after you see how well our 
software helps you perform programming tasks, you will purchase, them 
like thousands of others have. 

Our trial package consists of a master diskette which may be" used to 
create one working copy. Your purchase price for the trial package will be . 
credited toward the purchase of any software Snappware sells. 

If for any reason you are not satisfied, just -return the trial diskette and 
working copy and we will refund your money, no questions asked. 'With 
an unconditional guarantee like this, you can't lose. 

Call our toll free number 800-543-4828 to put us on trial. We're sure your 
verdict will be: Snappware saves you time and, money. 



MODEL il TriaS Package $50 00 

MODEL Hi Trial Package ..... .$35.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 

COLLECT; (513) 891-4498 

3719 ManteH 

Cinti., Ohio 45236 



Answering readers 7 questions 



Models l/ll/lll 



Timothy K. Bowman, Contributing editor 



Before I answer several questions 
that have been sent in, I would like 
to take this opportunity to thank you 
for your overwhelming response to 
this column. So far, two columns 
have generated most of my mail: 
the stock program column and the 
command files column. Look for 
future columns on DIF, VisiCalc 
information sources, graphics, and 
much more. Send in your questions 
or suggestions for future columns to 
me in care of Basic Computing. 
Please enclosed a stamped, self- 
addressed envelope if you desire a 
personal response. We all have a lot 
of VisiCalc exploring to do. 

How can I print my reports with 
double spacing? 

There are two ways that this can 
be accomplished. The first way is by 
invoking the print command (/PP). 
The prompt line then shows "Lower 
right, "Setup, -, or &." By pressing 
the shifted 6 key (&) all output is 
printed in double spacing. The 
second way is to simply insert a 
blank line between each line used in 
your VisiCalc file by using the /IR 
(insert row) command. If you 
wanted to insert a number of lines, a 
series of /IR command routines 
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could be built into a command file. 
Do you see how to print only a 
portion of a report printed in single- 
spacing and a separate portion 
printed in double-spacing? 

My VisiCalc clobbers a serial 
printer driver that is loaded in high 
memory. How can I preserve it? 

In order to preserve a serial printer 
driver, set the memory size, load the 
driver, and be sure to change the 
device control block found at 4025H 
to point the DCB to the high memory 
driver program and the VisiCalc 
program will honor the driver 
program. This method is actively 
used by at least one reader who uses 
VisiCalc on a Model I with a serial 
printer. If you are unsure about 
DCB's, look back at the December, 
1982 issue of 80-U.S. Journal for a 
discussion on Device Control Blocks 
(Driver Education on page 50). If you 
find the above instructions are too 
vague, contact me in care of Basic 
Computing, and I will give more 
specific guidance. 

When I load certain files, some of 
the cell positions show "error." Is 
there a way to eliminate the error 
message? 



The reason that error shows up in 
a certain cell position is that those 
cell positions depend upon other cell 
positions which have not yet had 
correct values calculated before the 
value was needed for another 
calculation. There are several 
solutions to the problem. First, you 
can force the sheet to recalculate all 
values by pressing the shifted one 
key (! key). This should remove all 
error messages. A second method is 
to change the order of recalculation 
by typing /GOR if the recalculation 
order is currently by columns or 
/GOC if the recalculation order is 
currently by rows. Third, it is 
important that formulas which 
depend upon previous cell position 
calculations be positioned to the 
right and below that previous cell 
position. 

I load my Model III VisiCalc 
program and it shows I only have 
18K of memory available. Is there 
any way to gain more memory?. 

In short, no. While there are only 
18,000 bytes of memory, a key 
solution is to use memory 
conservation techniques. For 
examples of those techniques, see 
back columns of Exploring VisiCalc 



^m^^m ^ ^^^^mm^ ^^^m ^^^^ ^^^ 



and especially the October, 1982 
issue. I will also be sharing other 
memory conservation tips in future 
columns. Watch for them. To 
tantalize you a bit, I understand that 
my Model IV version of the elec- 
tronic spreadsheet will be able to use 
the full 128K capacity of that 
machine. Watch this column for 
further news! 

Your column on command files 
provided me the key to clearing big 
portions of my spreadsheet, but it 
seems to take too long. Is there a 
quicker method? Yes, a quicker way 
is to create a DIF file which is the 
size of the area that you wish to clear 
and contains nothing but blank cell 
positions. Then, position the cursor 
in the upper left corner of the area to 
be cleared and load the blank DIF 
file. Quick and painless! 

I find it difficult and frustrating to 
remember what filename I last 
saved my spreadsheet under. Is 
there an easier method to remember 
the filename short of taking a 
memory enrichment course? 

An easy method of remembering 
the filename under which a 
spreadsheet is saved is to write the 
name of the file in the upper left 
corner of the sheet (cell position Al) 
and not make any other entries on 
that line. Then, when you go to save 
the file to disk, simply match the 
filename on the command line with 
that found in position Al. Be sure to 
keep in mind when printing your 
sheet that your printing should start 
in cell position A2 unless you want 
the filename to be printed. This 
should be especially helpful to you 
Model I VisiCalc users who don't 
have the feature that helps prevent 
the overwriting of existing files. 

Finally, I would like to make a 
plug for a significant banking 
industry microcomputing confer- 
ence. If you want to see all that is 
available in microcomputers and 
banking (including VisiCalc), plan 
to attend Bank Administration 
Institute's MICROSCAPE '83 at the 
Hyatt Regency, Chicago, August 28- 
31, 1983. I'll be speaking there and 
would enjoy meeting any of you who 
would be able to make the 
conference. 

DIF is a registered trademark of 
Software Arts, Inc. 

VisiCalc is a registered trademark of 
VisiCorp. 




SPECIALIZING IN TELECOMMUNICATIONS 
THIS MONTH FEATURES! 





ULTRA TERM 

A Full Featured Terminal Program 

The Ultra Term communications package 
is one of the easiest to use and most versatile 
communications programs available for the 
TRS-80. It includes a full featured intelligent 
terminal program, with all the popular fea- 
tures of competing programs costing two to 
three times as much, and some new features 
that can't be found anywhere else at any 
price. Ultra Term also includes a self relocat- 
ing host program, and hex conversion utili- 
ties for bulletin board downloading. Some of 
Ultra Terms unique features are: 
© Supports both manual and auto dial 

modems. 
« Exclusive Ultra Term direct to disk file 
transfer mode, allows unattended opera- 
tion at the receiving computer. 
® Exclusive split screen feature allows simul- 
taneous two way communications without 
confusion. 

• Line printer support with a IK print buffer, 
a Half and full duplex support. 

o Universal ASCII format file transfer with a 
33K Buffer. 

• A full featured host program. 

Ultra Term Price: $59.95 



LYNX MODEM 
EMTROL Systems Lynx modem is an 
auto dial auto answer modem for use 
on TRS-80 Model 1 or Model 3 with or 
without an RS-232 interface. Thats 
right, this modem includes an RS-232 
interface internally, so you can use it 
on any TRS-80 computer, even if you 
don't have an expansion interface or 
RS-232 board installed. 

The Lynx includes a one year factory 
warranty with one day turn around on 
service should it ever become 
necessary. 



Lynx Modem price $249.95 



SOFTWARE 

a Ultraterm from United Software $59.95 

s Microterm from Micro Systems $69.95 

o Omniterm from Lindbergh Systems $85.00 

a Intelliterm from Microcorp $134.95 

© I nfoex-80 BBS from United Software $134.95 



HOPES! GAMES 
Modem Games tape: $14.95 

Chess Checkers Othello disk: $17.95 
Commbat Tank Game $44.95 

Includes TRS-80, Apple and 
Atari Versions 



BNFOEX - 80 
Bulletin Board System 

The INFOrmation Exchange bulletin 
board program contains all the software 
necessary to set up your own bulletin 
board service or message center. 

The I nfoex-80 software automatically 
answers phone calls, displays a logon 
message or bulletin, allows callers to 
enter and retrieve messages, and lets 
users chat (type) directly to the system 
operator. 

lnfoex-80 supports uploading and 
downloading in both universal ASCII 
format and Ultra Term disk file transfer 
format for accurate and fast file transfer. 

lnfoex-80 allows users to apply for 
individual passwords, so private password 
protected messages can be left for any 
user. The system also keeps track of the 
number of times eash user has accessed 
the system, as well as the highest message 
each user has read, and advises each user 
when messages have been left for them. 

INFOEX-80 Version 2 Price $134.95 




Modem Strategy Game 

Commbat is a two player tank stra- 
tegy game that can be played over a 
modem. I n this game, the playing field 
is divided into a two by four matrix of 
sectors that are further divided into a 
32 by 16 matrix. The player is given 
eight tanks, a base, three decoy bases, 
and various weapons including rockets, 
lasers, shells, mines and one ICBM. 
Your mission is to locate the enemys 
base and destroy it with your ICBM, 
before he can discover the location of 
your base. Commbat comes complete 
with a TRS-80, Apple, and Atari disk 
for one low price. 
Commbat price $44.95 



HARDWARE 

Lynx Auto Dial/Answer Modem $249.00 

Microconnection Manual Modem $149.00 

Microconnection Auto Answer $179.00 



MUSIC FilOU 
SOFTWARE AFFAIR 

Orchestra 85/90 Music Synthesizer $89.95 

Piano Software for above $34.95 

Greatest Hits Songs Data File $17.95 

Fanfare Software Music Routines $22.95 



UNITED SOFTWARE ASSOCIATES 

734 FLAMINGO WAY, NORTH PALM BEACH, FL 33408 

ORDERS - 305/965-3496 BBS - 305/842-2687 
COD ORDERS — ADD $3.00 
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Universal printer driver 



Exploit your printer's capabilities 
with simple commands 



Model III, Scripsit 3.2 



Gary A. Shade, Arlington Hts., IL 



There have been numerous 
articles detailing patches to Scripsit, 
for use with various printers. None 
of the patches that I have seen 
modifies Scripsit 3.2, a version for 
the Model III. While the Model I 
Scripsit can be used on the Model III, 
I would prefer to use the latest 
revision for my machine. Ail of the 
patches have one common goal and 
that is to give the user the ability to 
exploit the capabilities of the many 
printers on the market. 

This article details a patch to the 
Model III Scripsit 3.2 that will allow 
you to embed printer commands in 
the body of a document. You will be 
able to switch between normal print 
width or double-size characters, 
change pitch, sound bells, or other 
printer-specific functions. All of this 
can be accomplished on the same 
line. By the end of this article, you 
should have enough knowledge of 
the routine and driver to enable you 
to create your own command tables 
for your printer (or typesetter). 

The Program 

The program expects a command 
character to be immediately after 
the pound sign (#). A table is 
searched for a match to the 
command character. If one is found, 
special printer codes are sent to the 
printer instead of the character that 
was in text. If the driver does not 
find a match, the pound sign and the 
character are sent to the printer. 

The "#" sign was chosen because 
Scripsit uses the greater-than 
symbol for its own formatting 
functions. I chose the pound sign to 
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avoid ambiguity. The original char- 
acter that was in register A, on entry 
to the driver, must be in register A on 
exit from the routine. 

Lines 210 to 300 of the program 
labeled PARLEL, load Scripsit into 
memory and change the parts of 
Scripsit that call the printer driver 
in the Model III ROM. No perma- 
nent changes are made to your copy 
of Scripsit, as the changes to it are 
made in memory and not on the disk. 
By loading the address of PARLEL 
1 into memory location 532 1H, we 
fool Scripsit into thinking that this 
is the end of memory. This protects 
the driver program from being clob- 
bered. It is similar to answering the 
memory size question in BASIC. It 



protects a machine language 
program that you have loaded into 
high memory. 

If this part of the code looks 
familiar to some of you, it is because 
the code can be found in the back of 
your Scripsit manual. The only 
problem is that the suggested patch 
is for the Model I version of Scripsit, 
not the Model III version. 

Table 1 contains ail the command 
letters used by the program. You can 
assign any keyboard character as a 
command character. It's up to you. 
Be sure to terminate the entries in 
the table with OFF (hex). Table 2 is 
the table that actually contains the 
printer control codes. There are 

ree bytes per entry. If only one 



Fia 



gure 1 — Text as printed by Scripsit with the driver. 
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the printer this is created on is the Line Printer IV » 

The characters that the printer can print, but are not 

available on the keyboard are? 



1 \ 



* I A. A 



> 



The 



"tch can be changed on a new line* 



You can print equations with sone fancy eodeing as well* 




Y = 



* \ t _. -n 



A slash zero is 3 combination of zero, backspace and slash 



0. A Spanish n or N can also be created* 




EE.M 



o^r DEMO* 






Driver 



control character is required to 
initiate a printer function, the 
remaining two bytes of the entry 
must be set to OFF (hex). The 
maximum number of characters 
that must be sent to the Line Printer 
IV to initiate a function is two. 
Therefore, I made the table entries a 
mandatory three bytes. The final 
byte is always OFF (hex). 

The module called DRIVER is the 
driver that Scripsit now uses to send 
characters to the printer. It is short 
and sweet with no frills or flashing 
lights. However, it does convert 
embedded commands to usable 
printer codes. If you've thought 
about buying a commercial patch 
such as Scriplus or Scriptr, you may 
find that this will suit your needs, it 
is certainly much less sophisticated 
than the commercial versions, but if 
all you're trying to do is send 
controls to the printer, you will not 
beat this driver's price. See the print 
samples in Figures 1 and 2 that 
demonstrate the Centronics 739's 
(Line Printer IV) capabilities. This 
patch is on the house. 

Setting Up Your Own Tables 

Table 1 and Table 2 are the tables 
you will alter by creating similar 
command tables with the codes 
required by your printer. Table 1 is 
the table that contains the character 
you designate as the command 
character that would follow the # 
sign. These symbols would be 
embedded in your document. Table 2 
is the table containing the actual 
control codes your printer requires to 
enable or execute a function. 
Consult your printer manual to 
determine what the actual codes are 
for your printer. 

Your printer may require more 
than three codes for a given 
function. Just remember that all 
entries in the table must be the same 
number of bytes, and the entry must 
terminate in OFF (hex). The other 
thing to remember is that for every 
byte in an entry, there must be a 
corresponding (INC DE) instruction 
inserted in the driver at the label 
NOTYET. See the listing. It is 
commented. 

Also remember that the first entry 
in the command table (Table 1) 
corresponds to the first entry in the 
function table (Table 2). The second 
corresponds to the second, etc. 



Fiqure 2 - Actual text as it appears on the screen. When printed under control of the driver 
in this article, and with a Line Printer IV (Centronics 739), the output of Figure 1 is obtained. 



the printer this is created on is the *ULine Printer IV-. *S 

The characters that the printer can print, but are not 

available on the keyboard are! 

tJ ti #Q *2 *M #1 *F #E *G #V *0. 

*B*P The #Dpitch#N can be changed on a new line. 

You can print equations with sone fancy coding as well, 

Y = 2x#A3#H--r#Hl#A#A5#H 

A slash zero is a combination of zero, backspace and slash. 

0#C/. A Spanish n*C#A#V*H or N*A#C*V*H can also be created, 

#DEND of DEMO. 



Figure 3 - Summary of Line Printer IV control codes. 



CODE PRINTER FUNCTION 

CR Prnt CoMMand, Carriage ret. 

LF Full line feed forward 

SI Start Underline 

SO Stop Underline 

ESCLF Full L. F. reverse 

ESC, SO Start double width characters 

ESC, SI Stop 

ESCDC1 Select proportional characters 

ESCDC3 Select 10 CPI Monospaced Chars 

ESCDC4 Sel, 16.7 CPI Monospaced Chars 



DECIMAL FORMAT USE 

13 *K 
138 #L 
15 *U 

14 *S 
27,138 *R 

27.14 #D 

27.15 *N 
27,17 *P 

27.19 *T 

27.20 *B 



Now use your home computer for 





Fast! Thorough! For serious students 
ot the Bible, an exciting new tool 
for analysis of Scripture is 
available through the use of 
computer technology. 
Bible Search Version 13* 
___ allows you to display or print any 

portion of New Testament text from disk files, scan the 
text for topics you specify, and edit and retain reference lists of 
selected verses for future use. 

Software, comprehensive instruction manual, and King 
James Version New Testament database &4^Q 

When ordering, please specify disk format and DOS. 

Old Testment available soon at an additional cost (less than $100). 

Send check or money order to: 

-_— __. P.O. Box 61 31 -C, Dept. BC 

^ct^be/o^^ Orlando, FL 32853 (305)896-4264 

■ Bible Search currently requires a TRS-80 (TM ol Tandy Corp.) Model I or III with 48K memory and two 
disk drives. Inquire about its availability on other computers. 
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To get more elaborate, you could 
decrement the printer's charac- 
ter/line counter (memory location 
402A hex), when you command the 
printer to backspace. Or, increment 
the counter twice when printing in 
double-width mode and once when 
printing any character that would 
not be generated from the keyboard. 
This would prevent the words from 
wrapping around at the end of a 
printed line. 

I hope you enjoy experimenting 
with this driver and expanding upon 
it. 



ESC,FS Half line feed forward 
ESC,RS Half line feed reverse 
BS,N~1 Back Space one character 



PRINTABLE HEX 

CHARACTER CODE 

ACUTE 27 

LEFT BRACKET 5B 

RICH! BRACKET 5D 

CARROT 5E 

UNDERLINE 5F 

GRAVE 6 

LEFT CURLY BRK 7B 

RIGHT CURLY BRK 7D 

RULE 7C 

SINE 7E 



DECIMAL 

CODE 

3? 

91 

93 

94 

95 

96 

123 

125 

124 

126 



27,28 

27,30 

8, <n 

n=10 

r. = 9 



*H 
*A 
1) #C 
for 10 cpi 
for 16*7cpi 
USE THIS 
SEQUENCE 
*J 
1 
!=Q 



FC00 
FC00 

FC00 
FC03 
FC06 
FC09 
FC0C 
FC0F 
FC12 
FC15 
FC18 
FC1B 



CDC901 
11FFFC 
CD3044 
CD2844 
21FFFB 
222153 
21.1EFC 
227460 
226G60 
C30052 



003B 
FG1E 
FC1E E5 
FC1F D5 
FC20 F5 
FC21 3AE837 
FC24 CB7F 
FC26 20F9 
FC28 3A0CFD 
FC2B FE00 
FC2D C244FC 
FC30 Fl 
FC31 FE23 
FC33 C259FC 
FC36 F5 
FC37 3EFF 
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00100 
00110 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00260 
00270 
00280 
00290 
00300 
00310 
00320 
00330 
00340 
00350 
00360 
00370 
00380 
00390 
00400 
00410 
00420 
00430 
00440 
00450 
00460 
00470 
00480 
00490 
00500 
00510 
ng 



.******* model IIIy TRSD 0S 1.3, SCRIPSIT 3.2 ***** 

;******* PRINTER PATCH BY GARY A. SHADE ***** 

;THIS ROUTINE LOADS AND MODIFIES SCRIPSIT TO PERMIT 

;USE OF YOUR OWN PARALLEL DRIVER 

/ 

;IT SHOULD BE LOCATED IN HIGH RAM. THIS EXAMPLE 

;IS LOCATED AT FC00 FOR A 48K MACHINE. 

; REQUIRES MODULES-SCRIPDRV/ASM AND TABLELPI/ASM 

;PUT NAMES IN DOWN BELOW 



PARLEL 



ORG 

EQU 

CALL 

LD 

CALL 

CALL 

LD 

LD 

LD 

LD 

LD 

JP 



0FC00H 
01C9H 



; ENTRY ADDRESS 
; CLEAR SCREEN 



DE.DCBADR 

LOAD 

CLOSE 

HL,PARLEL-1 

(5321H) # HL 

HL, DRIVER 

(6074H),HL 

(606CH),HL 

5200H . _,__ 

;******* DRIVER/ CONVERSION ROUTINE *********** 

;** THIS ROUTINE Will, CONVERT EMBEDDED COMMANDS *** 

?** TO CONTROL CODES FOR LP IV. USE WITH SCRIPSIT *** 



?DE=> FILE SPEC 

;OPEN AND LOAD SCRIPSIT 

; CLOSE COMMAND FILE 



,°ADDR. OF YOUR DRIVER 
,» ROUTINE 

j ENTER SCRIPSIT 



PRCHAR EQU 
DRIVER EQU 
BEGIN PUSH 
PUSH 
PUSH 
TEST LD 
BIT 
JR 
LD 
CP 
JP 
POP 
CP 
JP 
PUSH 
LD 



003BH 

$ 

HL 

DE 

«AF 

A, (37E8H) 

1, A 

N^ f 1 Eo J? 

a/(flagi) 


NZ.CONTRL 
AF 

NZ,PRINTI 

AF 

A,0FFH 



;SAVE HL Ab© DE AND A 

;SAVE aiARACTER IN A 
?TEST PRINTER STAT 
?LOOP TILL RDY 



?NON-ZERO=CONTROL CODE 

; RETRIEVE ACC A 

; FIRST PART OF CONTROL CHR 

;IF# THEN PRIMP 

;SAVE IT AGAIN 

;IF IT IS '#' SEr THE 



Driver 



FC39 320CFD 


00520 


LD 


(FLAGlhA 


FC3C AF 


00530 HOMEIT 


XOR 


A 


FC3D 320DFD 


00540 


LD 


(FLAG3),A 


FC40 Fl 


00550 


POP 


AF 


FC41 Dl 


00560 


POP 


DE 


FC42 El 


00570 


POP 


HL 


FC43 C9 


00580 


RET 




FC44 AF 


00590 CONTRL 


XOR 


A 


FC45 320CFD 


00600 


LD 


(FLAG1),A 


FC48 Fl 


00610 


POP 


AF 


FC49 CD5FFC 


00620 


CALL 


SEARCH 


FC4C F5 


00630 


PUSH 


AF 


FC4D 3A0DFD 


00640 


LD 


A, (FLAG3) 


FC50 3C 


00650 


INC 


A 


FC51 28E9 


00660 


JR 


Z,HOMEIT 


FC53 3E23 


00670 


ID 


A.^ TT 


FC55 CD3B00 


00680 


CALL 


PRCHAR 


FC58 Fl 


00690 


POP 


AF 


FC59 CD3B00 


00700 PRINTI 


CALL 


PRCHAR 


FC5C Dl 


00710 DONE 


POP 


DE 


FC5D El 


00720 


POP 


HL 


FG5E C9 


00730 


RET 




FC5F 219CFC 


00740 SEARCH 


LD 


HL,TABLE1 


FC62 11B5FC 


00750 


LD 


DE,TABLE2 


FC65 BE 


00760 NEXT 


CP 


(HLJ 


FC66 2023 


00770 


JR 


NZ,NOTYET 


MMfmimiimm 


mwm^MmMmm^tM§w 


IK-;* 



;FLAG FOR FOUND '#' 

; CLEAR THE COMMAND FLAG 
8 RETRIEVE A 

•RESTORE OTHER REGISTERS 



;CLR FORMAT EFFECTOR 

;FLAG 

;GET ACC A 

; SEARCH THE TABLES 

;SAVE THE CHR IN REG. A 

;IF FLAG = FF THEN DONE 

;INC PAST FF TST FOR ZERO 

;ZERO? THEN WE'RE DONE 

? ELSE, SEND '#' TO FrR 

;PRINTIT 

,-GET CHARACTER 

;PRINI THE CHARACTER 

; RESTORE REGISTERS 

;& RETURN 

-SETUP DUAL POINTERS 
? ONE FOR EACH TABLE 
;FIND IT? 
;NO? THEN INC. POINTERS 



<3N 



M 



m 

m 
H 
m 

1 

m 



1 

Hi 
1 



HI 

rara 
1 

M 



m 
m 

mi 

mm 

fee? 




100% RS COMPONENTS, NO FOREIGN DRIVES OR 



8K MODEL 100..... 

24K MODEL 100..... 

16KMODEL4 

64KMODEL4 ....... 

80K MODEL 12 1 DR . 
80KMODEL12 2DR . 
128K MODEL 161 DR 
128KMODEL16 2DR 



649.00 DMP 100 PRINTER $ 299. 

799.00 DMP 200 PRINTER. 599. 

799.00 DMP 500 PRINTER 

S579.00 DMP 2100 PRINTER 

!499.00 DWP 410 DAISY 

1149.00 DWP DAISY WHEEL II 

1898.00 12 MEG HD MODEL 11/12/16 

1510.00 ALL RS SOFTWARE 



CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS. 




NOCONA ELECTRONICS • Box593 . Nocona,TX 76255 
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Driver 



FC68 3EFF 


00780 


LD 


A,0FFH 


FC6A 320DFD 


00790 
00800 


LD 


(FLAG3),A 


FC6D 1A 


00810 


LD 


A, (DE) 


FC6E D3F8 


00820 


OUT 


(0F8H),A 


FC70 CD4004 


00830 


GALL 


0440H 


FC73 13 


00840 


INC 


DE 


FC74 1A 


00850 


LD 


A, (DE) 


FC75 FEFF 


00860 


CP 


0FFH 


FC77 2821 


00870 


JR 


Z.ENDIT 


PC79 D3F8 


00880 


OUT 


(0F8H),A 


FC7B CD4004 


00890 


CALL 


0440H 


FC7E 13 


00900 


INC 


DE 


FC7F 1A 


00910 


LD 


A, (DE) 


FC80 FEFF 


00920 


CP 


0FFH 


FC82 2816 


00930 


JR 


Z,ENDIT 


FC84 D3F8 


00940 


OUT 


(0F8H),A 


FC86 CD4004 


00950 


CALL 


0440H 


FC89 7E 


00960 
00970 


LD 


A, (HI,) 


FC8A C9 


00980 


RET 




FC8B 23 


00990 NOTYET 


INC 


HL 


FC8C F5 


01000 


PUSH 


AF 


FC8D 7E 


01010 


LD 


A, (HL) 


FC8E 3C 


01020 


INC 


A 


FC8F 2807 


01030 


JR 


Z,ENDTAB 



;IF YES SET THE FOUND FLAG 

;YES? THEN SET THE FOUND 

,-FLAG 

,»GET THE CHAR TO SEND TO 

;THE PRINTER 

?WAIT ON PRINTER 

,-GET THE NEXT CHR„ 

?END OF TRANSMISSION? 
;YES? THEN END 
;SEND TO THE PRINTER 
;WAIT ON PRINTER 
;GET THE NEXT CHAR 



; RESTORE ORIGINAL COMMAND 

j CHARACTER 

?DONE RETURN 

,-INC CMD CHAR. POINTER 

;SAVE CHAR IN REG A 

,°TEST FOR END OF CMD TBL 




America's most popular persona! computers have become significant genealogical tools. 



By combining the use of a Radio Shack® computer and one of the following program systems, you can store Information on family members 

Z t\ rTZTi w T l "l° rmaXon ° Ut '" S ^ e ^' f ° matS WithOUt having !o ret yP e '*■ You can update each person's info mat on a "an t m TwiTh the 
most recent facts The system can audit the data to find erroneous and incomplete stored data. You can direct the system to print nTme in 
oomn a t Ut ° matl< ; a "y- Y ?" can also ,P rint both P^igree and descendent charts starting with any person. This can all be done withoSSny special 
computer knowledge. There are also many more features to the following two systems. wimoui any special 



"GENSYSTESVSS' 



specialty: automatically adds and 

prints narratives and family tables 
storage/diskette: 335 to 705 persons 
computer system required: 
TRS-80® Model I , ill , or 4 with: 

48,000 characters of memory, 

2 disk drives, and 

an 80 or more column printer 



T 

i 

J 

i 

5 

i 
i 



"GENEALOGY ■ COMPILING 
ROOTS AND BRANCHSES" 

specialty: prints and maintains 

a complete book of information 
storage/diskette: 1000 persons 
computer system required: 
TRS-80® Model II, 12, or 16 with: 

64,000 characters of memory, 

1 disk drive, and 

an 80 or more column printer 



program system: 



$128.45 



program system: 



$250.00 



descriptive booklet: 



$2.00 



i 



descriptive booklet: 



$2.00 



5009 Utah Street 



please address inquiries and orders as follows: 
ARMSTRONG GENEALOGICAL SYSTEMS 

c/o John J. Armstrong R.Ph. 
Greenville, Hunt County, Texas 75401 



(214)454-8209 



TRS-80® and Radio Shack® are registered trademarks of the Tandy Corporation 
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Driver 



FC91 Fl 
FC92 13 
FC93 13 
FC94 13 



FC95 C365FC 
FC98 Fl 
FC99 C9 
FC9A 7E 
FC9B C9 

FC9C 4B 

4C 55 53 
42 48 41 
4A 49 4D 

FCB4 FF 

FCB5 0D 

FCB6 FF 

FGB7 FF 

FCB8 8A 

FCB9 FF 

FGBA FF 



01040 

01050 

01060 

01070 

01080 

01090 

01100 

01110 

01120 

01130 

01140 

01150 

01160 

01170 

01180 

01190 

52 44 

43 56 

4F 51 

01200 

01210 

01220 

01230 

01240 

01250 

01260 



POP 
INC 
INC 
INC 



AF 
DE 
DE 
DE 



; RESTORE REGISTERS 
;INC TO NXT 3 BYTE ENTRY 
;OF PRINTER CODES 
„**** NOTE *** 



.******** IF YOUR PRINTER/TYPESETTER REQUIRES A FOUR 
•BYTE CODE SEQUENCE TO EXECUTE A COMMAND INSERT ANOTHER 
•Z-80 (INC DE) INSTRUCTION HERE, THERE MUST BE ONE FOR 
J PER BYTE, FOR AN ENTRY IN TABLE 2 OF THIS DRIVER **** 



JP 
ENDTAB POP 

RET 

ENDIT LD 

RET 
. ************ 

TABLE1 DEFM 
4E 50 54 
45 46 47 
31 32 



NEXT ;GO SEARCH THE NEXT ENTRY 

AF ?CHAR NOT IN TABLE SO. . . 

; RESTORE IT AND RETURN 
A# (HL) ?GET ORIGINAL CHAR. AND 

; RETURN TO SCRIPSIT 
TABLE 1 CONTROL CHARS. FOR LPIV ***** 
8 KLUSRDNPTBHACVEFGJIMOQ12 ' 



TABLE2 



DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 



0FFH 

0DH 

0FFH 

0FFH 

8AH 

0FFH 

0FFH 



;END OF TABLE1 

;CARR. RET, PRINT CMD 



? FULL LF FWD 




(Located 30 miles from Fort Worth) 
377 Plaza • GRANBURY • NR FORT WORTH . TEXAS 76048 

t: 1 - 800 - 433-S-A-V-E 

IN TEXAS CALL: 817-573-4111 
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Driver 



FCBB 0F 
FCBC FF 
FCBD FF 
FCBE 0E 
FCBF FF 
FCC0 FF 
FCC1 IB 
FCC2 8A 
FCC3 FF 
FCC4 IB 
FCC5 0E 
FCG6 FF 
FCC7 IB 
FCC8 0F 
FCC9 FF 
FCCA IB 
FCCB 11 
FCCC FF 
FCCD IB 
FCCE 13 
FCCF FF 
FCD0 IB 
FCD1 14 
FCD2 FF 
FCD3 IB 
FCD4 1C 
FCD5 FF 
FCD6 IB 
FCD7 IE 
FCD8 FF 
FCD9 08 
FCDA 09 
FCDB FF 
FCDC 7E 
FCDD FF 
FCDE FF 
FCDF 7D 
FCE0 FF 
FCE1 FF 
FCE2 7B 
FCE3 FF 
FCE4 FF 
FCE5 7C 
FCE6 FF 
FCE7 FF 
FCES -27 
FCE9 FF 
FCEA FF 
FCEB 60 
FCEC FF 
FCED FF 
FCEE 5F 
FCEF FF 
FCF0 FF 
FCF1 5E 
FCF2 FF 
FCF3 FF 
48 Basic Computi 



01270 
01280 
01290 
01300 
01310 
01320 
01330 
01340 
01350 
01360 
01370 
01380 
01390 
01400 
01410 
01420 
01430 
01440 
01450 
01460 
01470 
01480 
01490 
01500 
01510 
01520 
01530 
01540 
01550 
01560 
01570 
01580 
01590 
01600 
01610 
01620 
01630 
01640 
01650 
01660 
01670 
01680 
01690 
01700 
01710 
01720 
01730 
01740 
01750 
01760 
01770 
01780 
01790 
01800 
01810 
01820 
01830 
ng 



DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 

DT7TPD 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 



0FH 

0FFH 

0FFH 

0EH 

0FFH 

0FFH 

1BH 

8AH 

0FFH 

1BH 

0EH 

0FFH 

1BH 

0FH 

0FFH 

1BH 

11H 

0FFH 

1BH 

13H 

0FFH 

1BH 

14H 

0FFH 

1BH 

1CH 

0FFH 

1BH 

1EH 

0FFH 

08H 

09H 

0FFH 

7EH 

0FFH 

0FFH 

7DH 

0FFH 

0FFH 

7BH 

0FFH 

0FFH 

7CH 

0FFH 

0FFH 

27H 

0FFH 

0FFH 

60H 

0FFH 

0FFH 

5FH 

0FFH 

0FFH 

5EH 

0FFH 

0FFH 



; START UNDERLINE 



ySTOP UNDERLINE 



;FULL LF REVERSE 



; START DOUBLE WIDTH CHR 



;STOP 



•« <• « II 19 It It || 



; SELECT PROPORTIONAL CHR 



,» SELECT 10 CPI 



; SELECT 16.7 CPI 



?HALF LF FWD 



;HALF LF REVERSE 



? BACKSPACE 1 CHR 16.7 



;SINE 



; RIGHT CURLY BRACKET 



;LEFT CURLY BRACKET 



;RULE 



; ACUTE 



; GRAVE 



; UNDERLINE 



; CARROT 



Driver 



PCF7 
FCF8 



FCF4 5D 
FCF5 FF 
FF 
5B 
FF 
FF 
FCFA 5C 
FCFB FF 
FCFC FF 
FCFD 



FGFD C9 
FCFE 00 
FCFF 53 
43 
43 
FD0B 03 

4430 

4428 

FD0C 
FD0D 

FG00 



01840 
01850 



01870 
01880 



01900 
01910 
01920 
01930 
01940 
01950 
01960 
01970 
■ 01980 



02000 
02010 

52 49 50 53 

4D 44 



02030 



02060 
02070 



DEFB 
DEFB 
DEFB 
DEFB 

DEFB 
DEFB 
DEFB 
DEFB 
DEFB 



SDH 

0FFH 

0FFH 

5BH 

0FFH 

0FFH 

5CH 



; RIGHT BRACKET 



;LEFT BRACKET 



? SLASH 



0FFH 



INIT EQU $ 

! IF YOU HAVE A SPECIAL INITIALIZATION * 

; ROUTINE PUT IT HERE * 

.A***************************************************** 



RET 
SWITCH DEFB 
DCBADR DEEM 
49 54 2F 








DEFB 



LOAD 

GLjGoE 

FLAGl 



EQU 



EQU 



4430H 
4428H 

$+1 

PARLEI 



;MARK END OF FILESPEC 

? CALL TO DOS TO LOAD FILE 
rCALL TO DOS TO CLOSE FLE 



;1 BYTE FOR FLAG3 




SMMcts 






AND SERVICE 
TOO GOOD TO 



!SSJHE 



nsso 



® 



GOOD TO PASS UP! 



NEWD0S8G7V.2 
LD0S5.1 

Trash man 

Faster 

RPM - Disk Timer 
LDOS Utility Disk #1 
The BASIC Answer 

Lazy Writer 
Newscript 7.0 
Newscriptw/labels 
Electric Webster 
EW Grammar Opt. 
EW Hyphen Opt. 
LNW System Exp. I! 
LYNX Modem 



124.95 
109.95 
34.95 
24.95 
22.50 
42.50 
59.95 
139.95 

yy , y *j 
114,95 
129.50 
34.95 
41,95 
349.95 
229.95 



Maxi Manager 

Maxi Mail 

Maxi Stat 

Maxi CRAS 

The Home Accountant 

Postman 

Postman w/Postwrite 

GEAP2.1 

Dot Writer 1.5 

GEAP+ Dot Writer 

Omniterm 

M-ZAL 

Super Utility + 

Percom Doubler 

LNOoubler5/8 



119.50 

79.95 

169.95 

79.95 

62.95 

69.95 

99.95 

46.50 

55.95 

79.95 

79.95 

114.50 

65.95 

145.95 

164.95 



And Much More — Write for FREE Catalog 



■ 34-Hwr Sapping lor Items in StocK 

■ Ffee Use nl Cretin Cafds 

* U*gfl Seleciio^-Caii for Itefn* Ngc Listed 



* Toll Fr« Oriler un? 

9 Ffee Shipping, or* Orders pvtf 5100 

■ Friendly. Honest fltfistue Se^ice 



ft* jcci^L V^i tfaslfli Cira clwrt g«p "wet 
pftra jnCCOO kittn« artmwtii Sulci wa$2 00 
KM UfS ItlMJrO **to**l *** oa^ s**p« * F** 
vm is art' tEDQ UllfcJ V* Hmv flfflfs « 

chr?dirtt»tiihfm0vp* CODonMrttftciwgBfl 

jn rirtwt vtlf F**l t*d irWwmUion cprnpUif 

■ Hiatal ida upwrtB "*** : * r l *' 1 ^ * D"*** 1 
(*cra *-t v*)*:i 19 ^*n* *iP*fci **<* 




I Applied Microsystems, Inc. 

B1BHW1 612 Washington, Denver CO 30203 

1-800-468-4474 

IN COLORADO CALL 861-9250 



ORDER NOW 
TOLL FREE 



it u .htui laqm:* s-in*w» he 



UL s i ^ »i CAU He 



Tim i i T¥ rf T**** c*a 



int-Hi 't i T » p> sflsi "t 



LAFAYETTE ESCADRILLE 



Heavily laden with bombs, your DH4 struggles into the 
air, narrowly clearing the trees at the end of the runway. 
The big bomber climbs steadily as you head eastward 
towards the rising sun. To the south a troop train chuffs 
hastily back from the front as you level off and turn 
southeast towards your objective. You hug the bottom of 
a concealing cloud layer as you cross the zig-zag 
trenches of the Western Front. So far— so good— the 
bridge you seek becomes visible in the distance. You 
throttle back and descend for a bombing run— But wait- 
look out! A Fokker Triplane has been stalking you! He 
closes in, guns blazing— You nose up, heading for the 
Clouds— STALL!! 

Too bad, you didn't make it, but there's always a next time 
in Lafayette Escadrllle. Fly any of two dozen WW I Allied 
or German bombers or fighers in this Real-Time Animated 
Action computer game. 

Cassette for 16K TRS80 Model I and III $19.95 

DISCOVERY GAMES 

936 W. Highway 36, St. Paul, MN 551 1 3 
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BASIC bits 

Screen printing and a dis 
renaming program 




Models l/lll 



Thomas L. Quindry, Contributing editor 



When I wrote last month's 
column, I didn't know that there 
would be an article on MID$= in the 
May issue of 80-U.S. Journal (page 
38). Though it slightly upstaged my 
one tip concerning this function, 
there is still more to tell about 
MID$=. I recommend that you read 
the May article as well as last 
month's column if you haven't 
already done so. 

Vince Bly, who gave me the tip on 
redefining string locations in 
memory, suggested using this re- 
definition principle for screen 
dumps to a lineprinter. Based on our 
discussion, I have written the 
following two routines (Listings 1 
and 2). 

Listing 1 — Simple Screen 
Print Routine 

20 'CONCEPT BY VINCE BLY 
30 CLEAR128:V=0:SC$= M " 

40 V=VARPTR(SC$):POKEV,64: 

LN%=15360 

50 POKEV+l,PEEK(VARPTR(LN% 

) ) : POKEV+2, PEEK(VARPTR(LN% 

)+D 

60 FOR N=l TO 15:I$=SC$:LP 

RINTSC$ 

70 PRINT@960,I$;:NEXT 

80 GOTO 80 

Listing 2 — Enhanced Screen 
Print Routine 

20 'CONCEPT BY VINCE BLY 

30 VL%=0:VS=0:SC$= ,l,, 

40 VS=VARPTR(SC$):POKEVS,6 

4 : LN%=0 : LL=VARPTR( LN% ) 

50 FOR 12^=15360 TO 16320 

STEP 64 

60 POKEVS+l,PEEK(LL):PGKEV 

S+2 f PEEK(LLfl) 

70 LPRINTTAB(8)SC$:NEXT 

Using each of these routines with 
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a Model I, I am told that if you have 
the Radio Shack lowercase conver- 
sion installed, you must make sure 
the upper/lowercase driver program 
is being used in order to get a proper 
screen dump, I suppose this applies 
to non-Radio Shack conversions 
also. 

Each of these routines illustrates 
an important fact. The routine in 
Listing 1 sends to the line printer 
only the first 15 lines. It 
accomplishes its task by assigning 
the string variable to the screen 
width, 64, and the address of the first 
video line. After the contents of this 
video line are LPRINTed, the screen 
is scrolled by one line to replace the 
contents of the defined string with 
whatever characters were 
previously in the second line. This 
repeats until all 15 lines are 
LPRINTed. The screen display ends 
up exactly as it began and' the 
routine ends. 

Listing 2 is a little more 
sophisticated. The string location is 
continually repositioned to point to 
successive video addresses repre- 
senting lines one through sixteen of 
the screen and each is LPRINTed. 

These two routines show the full 
power of this little tip. If the string 
position remains static in memory 
as in Listing 1, whatever data is 
placed within the bounds of the 
defined string area becomes the 
value of the string. If the string 
position is dynamic in memory, as in 
Listing 2, data that is occupying the 
bounds of the newly-defined string 
becomes the value of the string. 

The nice thing about redefining 
the string area is that you can do it 
anywhere in memory, including 
ROM (as we saw last month). This, 
coupled with the properties of the 
MID$= function, becomes very 



important, as we shall see. If a string 
was placed in reserved string space, 
or higher (protected memory), the 
MID$= function would make a 
direct substitution of characters to 
that location. Listing 3 uses this 
principle. 

Listing 3 - TRSDOS Diskette 
Renaming 

10 'RENAME TRSDOS DISKETTE 

20 POKE 16561,&HEE:POKE165 

62 , &HBE : POKE16409 , 1 : CLEARS 


30 FOR N=&HBEF0 TO &HBEFC: 

READA: POKEN, A:NEXT 

40 IF PEEK(293)<>73 THEN P 

OKE &HBEFA, 221: POKE &HBEF1 

,0 

50 DEFUSR=&HBEra 

60 Nl$=" " :N1=VARPTR(N1$ ) : P 

OKEN1 , 8 : POKEN1+1 , &HD0 : POKE 

N1+2,&HBF 

70 DATA 17,1,17,1,0,0,33,0 
,191,205,117,70,201 

80 CLS: PRINT" RENAME TRSDOS 

DISKETTE 
90 PRINT: PRINT"PLACE DISKE 
TTE IN DRIVE:0 AND PRESS < 
ENTER> OR 'Q' TO QUIT.": PR 
INT 

100 Y$=INKEY$:IFY$=""THEN 
100 ELSE IF Y$="Q" THEN EN 
D 

110 X=USR(0):PRIOT H CURRENT 

NAME IS "Nl$: PRINT 
120 N3$=N1$: INPUT" ENTER NE 
W NAME";N3$:N3$=N3$+" 

":MID$(N1$,1,8)=MID$(N3 
$,1,8) REM EIGHT SPACES BE 
TWEEN QUOTES 
130 PRINT: PRINT "ENTERING " 



:FOR N=l TO 



:NEXT 
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140 IF PEEK(293)<> 73 GOTO 

160 
150 POKE &HBEFA,0;X=USR(0) 
sPOKE &HBEFA,117sGOTO 80 
160 POKE &HBEFA,239sX=USR( 
0)sPOKE &HBEFA,221sGOTO 80 

This BASIC program can only be 
run with TRSDOS 1.3 or 2.3. The 
program is set up for 32K, or greater, 
memory. 

In this program, the first sector of 
the directory track of a Model I or 
Model III TRSDOS diskette is read 
and the information placed in a 
buffer which is located in protected 
memory. Line 20 protects the 
memory. In line 30, the DATA 
statement (line 70) is read and 
placed just below the buffer area. 
This code represents a small 
machine language subroutine to 
read the first sector of the directory 
track. Line 40 makes small changes 
to the subroutine just placed in 
memory if a Model I computer is 
being used. (This technique was 
explained in my June column.) Line 
50 sets up the USR function address 
and line 60 creates a dummy string 
and then redefines it; giving it a 
length and address which puts it 
within the buffer area where the 
directory sector will be placed. 

Line 60 is a very important step. 
By knowing the format of the first 
directory sector and where this 
information is placed in memory, I 
know that the diskette name will be 
located starting at the hexadecimal 
address FD0H and will extend for 
eight bytes. This is what the 
statements in line 60 do. They 
redefine the dummy string, Nl$, to 
that location. Now, whenever I 
instruct the computer to PRINT 
Nl$, I will get the name of the 
diskette. This is similar to what is 
done in Listing 1. Line 110 calls the 
subroutine to read the directory 
sector and PRINTs the current 
name of the diskette on the screen. 
Now, the fun part. Line 120 asks 
you to rename the diskette. This is 
where the MID$= trick comes in. 
Using MID$= places the first eight 
characters of the name you specify 
from N3$ to the location of Nl$. 
Since the MID$= function makes a 
direct replacement in memory, you 
now have your new name in the 



correct location of the directory 
sector as it appears in the buffer. 
Please note that the location of the 
Nl$ is in protected memory, not 
reserved string space. 

A few whiz-bang changes in our 
subroutine makes it a write disk- 
sector subroutine rather than a read 
subroutine (line 150 to line 160, 
depending on whether you have a 
Model I or III. See line 140.) Now the 
buffer is written to the correct sector 
of your diskette and it has a new 
name. 

I must caution you to first try this 
program on a diskette that has been 
backed up. If a mistake has been 
made in coding, the program may 
render the diskette unreadable. 
Also, don't read the directory sector 
from one diskette and then try to 
place the information on another 
diskette. You will have a false 
granule-allocation table and the 
next time you try to add a program to 
the diskette, you will probably 
overwrite an existing program and 
destroy it. 



Next time, I'll explain the 
subroutine which I used to read and 
write to the disk sectors. With a few 
modifications, you will be able to use 
that routine to read and write to any 
sector of any diskette; even on a disk 
with another DOS format. 

My new Smith-Corona TP1 
daisywheel printer has this peculi- 
arity in interfacing with Radio 
Shack's Model I Scripsit program. It 
will not "hear" two carriage returns 
in a row. In order to double space 
text, I must tell Scripsit to use triple 
spacing. This messes up the line 
count for Scripsit especially if one 
wants variable line spacing between 
paragraphs. How can I defeat this 
fault? —R. G., Tarzana, CA 

Not having a TP1 printer, this 
question threw me for quite awhile. 
George Miller, from my computer 
club, came to the rescue by allowing 
me to try out different things on his 
printer and explaining how the 
printer operated. Essentially, the 
TP1 is like a typewriter. To control 
line spacing, the proper way is to set 




HBJ Educational Computer Software 



The Test Preparation Series 
that combines Computer 
Software, Review Textbook 
and User's Manual into the 
most comprehensive Study 
Program available today! 

•Makes studying for the exam easy 

and enjoyable 
•Builds test-taking skills quickly in 

planned systematic program 
• Simple and easy to use even lor those 

with no computer experience. 

COMPUTER SAT 
Preparation 
Special Features 

•1000 Electronic Vocabulary-Building 
Flash Cards 
•540 Computer Drill Items 

Complete Textbook 

•"How to Prepare tor the SAT" 470pps. 

•Four Full-Length Exams— enter 
answers in computer for instant scor- 
ing and diagnosis 



•Complete verbal and math categories 
•Strategies for answering every kind 
ot question 

User's Manual 

•Clear, simple documentation inte- 
grates textbook and software 

Computer Software 

•Scores and times your perlormance 

•Calculates College Board equivalent 
score 

•Diagnoses your strengths and weak- 
nesses in 15 key areas o f study 

•Prescribes specific drill and review 
on computer and in the textbook to 
improve your score 

Available For 

*TRS-80 Model lll®/4® with 48K 
•IBM* PC 
•Apple® with 48K 
•Atari 800*71200* 
•Commodore 64® 



COiPUTEi GRE 
Preparation 

This program helps prepare 



undergraduates for the Graduate 

Record Examination 

•3 double-sided diskettes with Graphic 
Displays 

•HBJ's popular text "How to Prepare 
forthe GRE" 

•A totally understandable, "User friend- 
ly" User's Manual 

•Apple 1 " with 48K 

COMPUTER ACT 
Preparation 

•480 page text "How to 

prepare for the ACT" 
• 3 double-sided computer* 

diskettes 

•50 page User's Manual 
•Apple 1 ' with >"" 




COMPUTER SAT Preparation (a $79.95 
available for 

□ IBM PC 

□ Apple® with 48K 

DTRS-80 Model III®/ 4® with 48K 
n ATARI 800®/1200® 

□ Commodore 64® 

COMPUTER GRE Preparation (a $89.95 
available for Apple® with 48K 

COMPUTER ACT Preparation© $89.95 
available for Apple® with 48K 



FOR CREDIT CARD ORDERS 

CALL TOLL-FREE 
800-543-1918 

(In California call collect (619) 699-6335) 



For mail orders Please add $2 00 for handling 
(UPS delivery guaranteed) Please add applicable 
state and local sales tax, (Institutions must send 
purchase order to be billed ) Offer restricted to 
Continental USA and Canada 




Harcourt Brace Jovanovich, Inc. 

Dept. Computer SAT bc-9-83 

1250 6th Avenue, San Diego, CA 92101 

Available at Computer stores and leading Bookstores. 
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MICROSETTE 




Buy Direct and Saw 

• 5V4 SS and DS Diskettes 

• Soft Sector Format Only 




□ Shipping Address Enclosed 

□ Check Enclosed 

□ Visa □ MasterCard 
Card # 



Exp. Date 
Signature_ 



MICROSETTE CO 

475 Ellis St. Dept. 1 

Mountain View, CA 94043 

(415) 968-1604 



BASIC bits 

the linefeed spacing adjustment on 
the printer as you would with a 
typewriter. 

George's TPl is a 12-pitch printer. 
You didn't specify the pitch on 
yours, so things may work a little 
differently. On the 12-pitch, you 
can't even fool the printer by 
printing a space before the line feed, 
it has to be a printable character. 
With the exception of sending only 
one line feed control, ASCII OD (zero 
D), the printer recognizes one less 
line feed than is sent. This is the 
cause of your problem. 

In lieu of setting the line feed ad- 
justment on the printer, I've written 
a small printer driver for you to use 
with disk Scripsit. Unfortunately, 
this driver will affect other printers 
adversely, giving them an extra line 
feed at times, so label your modified 
Scripsit as a special version. The 
driver is set up for the Model I ori- 
ginal version of Scripsit. This 
replaces part of the copyright notice, 
"OPYRIGHT 1979 BY RADIO 
SHACK A D." You will also have to 
change three codes starting at each 
of the addresses 665EH, 6722H, 
7A97H, and 7A9EH to CD0452. 
You'll have to have a program such 
as Superzap to make these changes 
on a Model I. 



If your Scripsit is a different 
version, you may have to find some 
other location to put the printer 
driver. Search your program for 
either codes 32E837 or CD3B00 and 
change them to CD LSB MSB, the 
least and most significant bits of the 
location you enter the code. It is re- 
locatable, but you will have to put an 
00 at address 5203H where COUNT 
(Listing 4) is placed. A good location 
for the Model III version 3.2, is 
starting at location 58C0H. You'll 
also have to put the 00 code at 5203H 
in place of 28H and put a code 08H in 
place of 40H at 58B7H. In this 
version of Scripsit, the code CD3B00 
occurs twice, starting at locations 
606CH and 6074H. Change them to 
CDC058. You can use the PATCH 
command to enter your code with the 
Model III. The main printer driver is 
replacing codes of all 20H's. 

Remember to send your requests 
for future column topics, questions 
and tips to me, care of Basic 
Computing, 3838 South Warner 
Street, Tacoma, WA 98409. Send a 
self-addressed stamped envelope 
and I'll try to give you a personal, 
handwritten reply as long as the 
answer is not too long and involved. 
Problems of general interest may be 
included in future BASIC Bits. 



Listing 4-TP-l Printer Driver for Model I Scripsit 



52 Basic Computing 



5203 


00100 


ORG 


5203H 


5203 00 


00110 COUNT 


DEFB 


00 


5204 E5 


00120 


PUSH 


HL 


5205 D5 


00130 


PUSH 


DE 


5206 210352 


00140 


LD 


HL, COUNT 


5208 FFJ0D 


00.150 


CP 


0DH 


520B 2010 


00160 


JR 


NZ, PRINT 


520D 7E 


00170 


ID 


A, (HL) 


520E B7 


00180 


OR 


A 


520F 200C 


00190 


JR 


NZ, PRINT 


521.1 3E0D 


00200 


LD 


A,0DH 


5213 34 


00210 


INC 


(HL) 


5214 CD3B00 


00220 


GALL 


003 BH 


5217 CD3B00 


00230 RETURN 


CALL 


003BH 


521A Dl 


00240 


POP 


DE 


521B El 


00250 


POP 


HL 


521C C9 


00260 


RET 




521D F5 


00270 PRINT 


PUSH 


AF 


521E 7AF 


00280 


XOR 


A 


521F 77 


00290 


LD 


(HL),A 


5220 Fl 


00300 


POP 


AF 


5221 18F4 


00310 


JR 


RETURN 


0000 


00320 


END 





IF YOU THINK SO, WAIT TIL 
ASSEMBLER ZEUS! 

CEC, the System Innovators have done it again. ZEUS gives 
new meaning to the word fast. There may be other editor- 
assemblers but ZEUS overshadows them all. 

• Loads source code (ZEUS format) 3 to 5 times faster. 

• Creates object code 2 1 /2 to 3 1 /2 times faster. 

• Utilizes 75% of disk space (ZEUS format) vs 
EDTASM format. 

• Creates object code for 794 instructions. (EDTASM 696) 

Available from the System Innovators 



COSMOPOLITAN ELECTRONICS CORPORATION 

5700 PLYMOUTH RD. 

ANN ARBOR, Ml 48105 



„........__.., 

Visa, Mastercard 

Accepted. Add $3.00 Technical Line: (313) 668-6660 INTRODUCTORY PRICED 

?ffi n a 9 ddS'o n9 c o.D ign Toll-free orders only: 800-392-3785 

add $1.50. C.O.D. orders are 
cash, certified check or money 
order. Personal checks take 

iS^aS^^r -DEALER INQUIRIES WELCOME- 
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And the magic software machine 



Bob Liddil, Contributing editor 



This is serious business. Twitch, 
who is by far our most tenacious 
guest evil villain of the month, has 
not only escaped the confines of his 
ROM prison, he has also followed 
my exit from where I'd been held 
prisoner in the 6809 microprocessor. 
He successfully made his way from 
the CoCo in the lab to realtime. 
Worse, I am on my way to Commu- 
nity Hospital with whiplash and a 
sprung typing hand. 

Max, meanwhile, was not sitting 
around idle. He had seen Twitch and 
company exit into realtime at the 
same instant as I, but could do 
nothing about it without running 
risk to me. He extrapolated the evil 
one's plan almost immediately and 
called for reinforcements among the 
Color Computer underground move- 
ment. These were the same brave 
freedom fighters who, two issues 
ago, spirited me away from the bad 
guys in the 6809 CPU core. 

Twitch's objective was the 
Aggravation 80 BBS located in the 
local Radio Shack dealer store. 
Linked by open telephone line and 
equipped with an auto-dialer, this 
system could launch him into the 
phone systems of North America, 
giving him access to tens of 
thousands of programs used only for 
downloading. These frustrated, 
sometimes half-finished programs, 
would be the perfect recruits for his 
army of minions. They would take 
over realworld if they weren't 
stopped. 

Max had to counteract the raid as 
quickly as possible. The freedom 
fighters from the CoCo wouldn't be 
enough. So he sent forth a call 
throughout all of TRS-80 land for 
recruits to fight a holy war to rid the 
universe (and this column) of Twitch 
once and for all. My house became 
headquarters for the final battle. 
54 Basic Computing 



Max was the general. 

And I, Field Marshal Von Eighty 
had just pulled on my uniform to go 
across town to review the troops. 
How did I find out what was 
happening? I never go anywhere 
without my Model 100 and a modem 
cable. 

Because realworld was a strange 
place to him, Twitch's first disad- 
vantage was in not knowing his way 
around town. You can get lost in 
Peterborough, New Hampshire 
easily if you're a stranger. He had 
scouts out looking for the location of 
the Radio Shack store while his 
main strike team lurked in the 
shadows of the old pizza parlor. 

Our scouts had already located 
them. The Bear Patrol from Troop 
834, which specializes in locating 
renegade computer programs and 
suppressing world takeovers, was 
right on the job, watching their 
every move. 

Meanwhile, I inspected the 
volunteers. There were thirty 
adventures who'd answered the call. 
Many of them were from my book. 
Some were "Other Ventures" from 
Scott Adams, looking to make a 
name for themselves. Phantom 
Slayer had just arrived, as well as 
Danger Ranger, a program from 
Med Systems (now renamed 
Screenplay). This guy is so new that 
he was only half here, but he was 
dangerous looking just the way he 
was. 

Others I recognized from past 
columns. Even a few old codgers 
from the Old Programs' Retirement 
Home were dressed out. It was a 
good army. 

A new Color Computer arcade 
game, Ninja Warrior, had designed 
a weapon for each of the troops. 
Called a de-rez whip, it looked like a 
cat-o-nine-tails. That was a fooler. 



Actually, it was a portable, power- 
charged, dimensional-transfer 
device that painlessly snapped its 
victim back into computerworld 
when touched. It had an insulated 
handle so as not to de-rez its owner. 
It was a deadly device. 

Max briefed me on Twitch's plan. I 
shivered. If Twitch ever got access to 
those open systems and the 
thousands of twisted, frustrated 
downloads that lived in them, the 
world would be lost. 

We swung into action. We 
deployed around the shopping 
center parking lot, well hidden, 
waiting for Twitch to appear. I'd 
taken the precaution of dialing up 
Aggravation 80 and recruiting 
Omniterm, the powerful intelligent- 
terminal program residing on drive 
two. He would act as forward spy 
and would prevent any terminal 
program in Twitch's lot from using 
the modem. The plan was simple. 
We'd let Twitch break into the Radio 
Shack store unopposed, surround 
him, and overwhelm him with sheer 
numbers, forcing him to surrender. 

It should have worked. I had 
forgotten about my own downloads 
and the fifty programs for my new 
CoCo book, all of which were in 
residence in the back of the Radio 
Shack store. None of them had any 
experience with re-animation. 
Suddenly, the odds were even. 

The element of surprise was ours. 
But what should have been an easy 
arrest exploded into a pitched battle. 
The minions of Twitch were armed 
with laser de-rez pistols, an 
infinitely more long-range weapon 
than the whips (though they did 
have the same effect). There were 
programs (in human form) running 
helter skelter. The night air crackled 
with laser bolts, snapped with de-rez 
whips, and popped with thunder- 



Captain 80 



claps as air rushed into the vacuum 
left by vanished warriors. 

The enemy's weapons were 
superior and taking their toll. No 
warrior could re-enter the battle once 
he'd been thrown back to computer- 
world and my team was dwindling 
rapidly. Finally, there was only Me, 
completely surrounded by hostile 
programs. Some were angry over 
reviews I'd written, some just very 
angry, and all were just out of range 
of my whip. 

The battle was lost. I was 
surrounded. The enemy had formed 
an inpenetrable ; wall around me 
which parted for the master of evil. I 
clutched the handle of the de rez 
whip as he drew nearer. The 
knuckles on my hand were white. 

"We meet a final time, my 
troublesome Captain." 

His voice was tinged with venom. 
His eyes burned with malevolence. I 
knew he would finish me if an 
unusual, but plausible, twist in the 
storyline didn't soon develop. 

Is this the end of Captain Eighty? 
Will Twitch emerge victorious and 
rule the world? Can Max survive in 
the world as an orphan? Do I really 

have the nerve to drag this story out 
for one more month? 

At the instant of my doom, a great 
bellowing sound reverberated 
through the parking lot. A de-rez 
whip cracked and a minion of 
Twitch imploded back into 
com p u terw or 1 d . 

Minotaur! Huge, hulking creature 
from Madness and the Minotaur! He 
waded into the crowded throng, 
snapped loose a dozen of the enemy 
before they could fully absorb who 
he was. 

"Get him!" shouted Twitch, 
exasperated at this new de- 
velopment. 

For that brief instant, his 
attention was on the renewed battle 
and not me. Two men stepped out of 
the shadows and grabbed me by 
each arm. One had pointy ears and a 
greenish complexion. 

"Scotty, beam us up," the other 
one said tersely. 

(I can hear my editor groaning 
now.) 

"Mr. Scott made special 
adjustments to the phasers," 
Captain Kirk explained as we left 
the transporter room running. 

As soon as we were on the bridge 



of the U.S.S. Enterprise, Kirk forgot 
about me and went to work. 

"Phasers locked and ready," said 
Sulu. 

"Fire phasers," said Kirk. 

The mighty U.S.S, Enterprise 
raked the parking lot of the Radio 
Shack dealer store in Peterborough, 
New Hampshire with phaser fire 
that sent them tumbling back into 
computerworld. But Twitch was 
absorbing the deadly rays and 
getting bigger and bigger and 
bigger. I knew what I had to do. 

Moments later, I stood in front of a 
now forty-foot tall Twitch. When he 
saw me, he reached down and 
scooped me up in his hand. He raised 
me up, even with his face. 

"Now I have you," he sheered and 
let loose an evil laugh. 

I let him have it right in the tonsils 
with a whole clip of milk-of-human- 
kindness gumdrops. 

"Noooo!" he shouted. "Any kind of 
an ending but that!!" 

Captain Kirk obliged. I slipped 
between his massive fingers and 
crashed to the ground (one of these 
days I have to learn to fly). The 
Enterprise fired three photon 
torpedoes that impacted squarely in 
the center of his chest. They 
exploded in a mass of white-hot 
light. Twitch began to change into a 
rainbow of 
pure 
energy, 
^!YOu 
have 
comp 
my pi 
Captai 
Twitch 
his voi 



rattling the windows. "As long as 
there are arcade games for any 
computer, I will be right there, 
encouraging mindless twitching, 
making sure that adventure, 
education and simulation play 
second fiddle to me, Twitch, the 
magnificent." 

With those words, Twitch went 
nova and exploded in a shower of 
multicolored sparks. Millions upon 
millions of tiny white light particles 
scattered to the winds. 

The battle was not over. It had just 
begun, for each transformed energy 
bit was a part of Twitch and they 
homed in on every personal micro-, 
mini- and mainframe computer in 
realworld. Within seconds, there 
was a little Twitch lodged in every 
computer in existence. 

The battle to put arcade games in 
their proper place has been 
transferred to the individual 
computerist. The best weapon to 
strike a balance between the 
different uses for computers is good, 
old-fashioned common sense. 

You might be curious about which 
Star Trek game rescued the world 
from enslavement. It was none other 
than Jake Commanders CC TREK, 
currently manufactured in Camden, 
Maine, and sold by mail order. 

As long as Star Trek lives, there's 
hope for mankind. 
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Depend on Radio Shack to Help Yoi 




New Low Prices! 5-Megabyte Hard Disk 

Drives for Models 4/III/I 



Primary Hard Disk System 



Was $2495 
In Cat. RSC-9 




Only $112 Per Month On CrtiLine Credit 



Secondary Hard Disk System 



Was $1995 
In Cat. RSC-9 




26-1131 



Only S101 Per Month On CitiLine Credit 



Increase data storage with our 5-megabyte Hard Disk System 
and get big improvements in speed and reliability with Win- 
chester technology User-friendly features make file handling 
a breeze! Store over 1000 files per disk system and create 
files as large as the available space. Special BACKUP fea- 
tures allow specifying files by date range, whether a file has 
been modified but not yet backed up, and backup of large files 



to multiple diskettes. Add up to three secondary hard disks for 
20 megabytes of storage. Includes powerful LDOS, plus in- 
structions on moving most Radio Shack software applications 
to hard disk, and an extensive user's manual. Installation is 
required on secondary drives. Requires 32K 1-Disk Model III 
or I or 64K 1-Disk Model 4. Model I owners may require 
A - J ~~ *-r Kit (26-1 132, $39.95). 




New! Profile III Plus Data Base Program for Hard Disk 



Our Profile III Plus Hard _ 
your present filing system 
reports and mailing labels . 
different data entry screens 
insure security of your data 
cess to data using any one 



program can be customized to 

simply by creating the formats, 

fit your needs. Tailor up to five 

Store up to 99 fields. Passwords 

Indexing allows high-speed ac- 

of 36 fields as search criteria. A 



math package performs arithmetic operations and updates 
other fields. Merge the mailing list features with a 
SuperSCRIPSIT® form letter and print out hundreds of cus- 
tom-addressed letters in minutes. Or use Profile III Plus to 
pass data to VisiCalc*. Requires 48K 2-Disk Model III Runs 
on Model 4 (in Model III mode). 26-1593, $299.00 




High-Resolution Graphics for Model III 



34995 

^^ ■ ^J 26-1125 



Only $28 Per Month 
On CitiLine Credit 



■ 

Use your TRS-80 Model III video display to create business graphs 
charts, tables, maps, illustrations, geometric patterns and animation' You 
get amazingly fine detail with the 153,600-pixel display. Graphics BASIC 
command structure insures ease of use. For 48K 1-Disk Model III Re- 
quires installation (not included). 



Powerful Programs for Your TRS-80 Model III/4 




NEW! VisiCalc Business Forecasting Model™. y,._ 

for financial modeling, forecasting, and analysis in real-life 
business situations. You can customize layouts, formulas and 
labels to meet the specific needs of your company. Includes 
nine files for financial modeling, including income statement, 
balance sheet, cash flow, salaries and more. Requires 
VisiCalc® program and 48K 1-Disk Model III Runs on Model 
4 (in Model III mode). 26-1521, $99.95 



Videotex Plus. A sophisticated communications package. 
Load information directly into memory before you transmit 
Features auto-dial and on-screen editing for tailoring auto log- 
on sequence. Pre-defined function keys give easy access to 
all features, or define your own for often-used commands. 
Includes one free hour on CompuServe® and Dow Jones 
News/Retrieval®. Requires modem and 32K 1-Disk Model III 
or I. Runs on Model 4 (in Model III mode). 26-1588, $49.95 



ou Get the Most from Your TRS-80 

New Low Prices! Model III/4 Floppy Disk Drives 



® 



Internal Disk Drive Kit 



Was S 349. 00 
In Cat. RSC-9 




26-1163 



Only S25 Per Month on CitiLine Credit 



Internal Disk Kit. Add a second 184K internal drive to your 
1 -disk Model III or 4 for a total of 368K of data storage. 
(Requires installation, not included.) 



Disk Drive 



Was $449.00 
In Cat. RSC-9 



IROOO 

%0%0^0 26-1164 



Only $28 Per Month on CitiLine Credit 

External Disk Drive. Increase the disk capacity of your 
Model 4, III or I with this 184K drive. Double-density 40- 
track 5 1 /4" floppy disk. Measures 6V4 x 3 1 /2 x 14 1 /2" Inter- 
nal Drive #1 required. 




New! Now the Pascal Language is Available for Your Model III 




Code Generator Creates Machine Language 

So Your Programs Run Three to Five Times Faster 

Optimizer Shrinks Program Size 10 to 30 Percent 

Build Libraries of Commonly-Used Routines and 
Apply Them As Needed With Linking Loader 

Incorporates Powerful Full-Screen Text Editor 

Includes Special Graphics Commands 



Model III Pascal is Flexible. The Pseudo-Code Optimizer 
reduces the size of your programs by an additional 10 to 30 
percent, so you get more space to write larger programs. Or 
you can use the Z80 Native Code Generator to convert the p- 
code into machine language, for three to five times faster 
execution of your programs. What's more, you can mix the 
two operating modes when you need both speed and space. 

Powerful Features. Build libraries of often-used routines 
and link them to your programs as needed. Another feature 
lets you write dynamic strings of any size and then recover 
the space they've used. Library commands include TIME 
and DATE routines and special graphics procedures, like 
CLEARSCREEN, CLEARGRAPHICS, SETPOINT, and 
more. In addition, there's a full text editor for creating pro- 
grams and other documents. 

Fully Supported. The 250-page documentation package 
includes Pascal Reference, System Implementation and 
Text Editor manuals and a Pascal tutorial program with a 
500 line data base. Requires 48K 1-Disk Model III. Runs on 
Model 4 (in Model III mode). 26-2211, $249.95 
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□ Send me your free TRS-80 Computer Catalog today 

Mail To: Radio Shack, Dept. 84-A-16 
One Tandy Center, Fort Worth, Texas 76102 
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For all models 



Terry R. Dettmann, Associate editor 



Last month, we started dealing with sequential files 
and what statements worked with them. This time, let's 
put them together to get some standard ways of using 
such files. We'll also introduce a useful function for 
dealing with such files. 

Writing a File 

Let's say that you have a bunch of information in 
memory, stored in a string array called A$, which is 
dimensioned for 100 elements. Let's also assume that we 
have a number N which tells us how many of these 
strings are filled, always starting from number 0. We 
can write this information to disk by going through the 
following steps: (1) Open the desired file for output, (2) 
loop from to N writing a single string each loop, and (3) 
closing the file. 

These steps could be implemented in BASIC like this: 
1000 REM - - WRITE FILE ■ 
1010 INPUT"FILENAME";FF$ 
1020 OPEN"0", 1,FF$ 
1030 FOR 1=0 TO N 
1040 PRINT #1,A$(I) 
1050 NEXT I 
1060 CLOSE#l 
1070 RETURN 

Notice the use of a string for the filename. This allows 
us to choose the name of the file when we need to and not 
before. Experienced programmers will notice that there 
is nothing to stop you from overwriting a file if you give 
it the wrong name. We'll get tricky later with ways to 
check to see if a file is in use. 

Reading from the File 

Once we've written a file, it would help if we can get 
the information back. If we know that there are N items 
on the file, we could write the program like this: (1) Open 
the file for input, (2) loop N times reading a string each 
time, and (3)close the file. 

In BASIC, this comes out to be: 
1100 REM ■ ■ READ THE FILE - - 
1 1 10 INPUT "FILENAME";FF$ 
1120 OPEN"l",l,FF$ 
1 1 :J0 FOR 1=0 TO N 
1140 INPUT#I, A$(I) 
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1150 NEXT I 
1160 CLOSEtfl 
1170 RETURN 

Here again, we have some problems not covered by our 
program. In this case though they are very significant. 
The major question is: How do we know that there are N 
items on the file? 

The answer is that there is no way for us to know 
unless we keep a notebook or written record of it. Since 
we're falli ble, even i f we do enter the n umber somewhere, 
it's bound to be entered incorrectly. 

One way to get around this is to store the number of 
items on the disk before the data. If we insert a line 1025 
in the write-file procedure: 

1025 PRINT*!, N 

and a corresponding line 1125 in the read-file procedure- 
1125 INPUTS, N 

then we're set. We always have the number because it's 
stored on the file. 

With some computer systems, this is the only way to 
know what's there. However, Microsoft BASIC provides 
us with a very useful function that can simplify matters. 
This is the EOF (End of File) function. 

EOF is a logical function in that it is TRUE if the file is 
at the end and FALSE otherwise. We can then use it in 
an IF statement to test for the end of the file. If we're 
going to use EOF, then we don't use line 1025 or 1 1 25, but 
we add lines: 
.1125 N = -1 
1130 FOR 1=0 TO 100 
1135 IFEOF(l)THEN 1160 
1145 N = N + 1 

When the subroutine ends, if N is less than 0, nothing 
was read in, otherwise N is the number of the highest 
array location in use. 

The new line 1130 is essential to the operation of this 
routine since it prevents us from going outside the 
bounds of the array A$. 

A simple mailing list program is included here as an 
illustration of one way of using the sequential file 
handling. Those who have been following the series will 
recognize a linked list, which is used in memory to keep 
everything in order. If you aren't familiar with this, 



Files 

don't let it bother you. We'll be going into it later in this 
series. 

As a point of interest, this program was originally 
written on a Color Computer for demonstration of 
sequential file handling techniques. The version printed 
was loaded from a Color Computer to a Model II and ran 
without change. 

Program Listing for Files and Foibles 

10 REM PROGRAM MAIL LIST 

12 REM NOTE; REMARK LINES WHICH 
END IN A DASHED LINE 

13 REM 
THE PROGRAM, DO NOT 

14 REM 
ER REMARKS MAY BE 

15 REM 
20 REM INITIALIZE - - 



ARE NECESSARY TO 
DELETE THEM, OTH 
DELETED 



25 REM CLEAR SPACE FOR STRINGS 
30 CLEAR2000 

32 REM MAXIMUM 100 ENTRIES 
35 MX=100 

37 REM DECLARE ARRAYS FOR ENTRY DATA (D 
A$), PROMPTS (PMPT$), 

38 REM THE ACTUAL MAIL LIST (LS 
T$), AND THE LINKS (LK) 

40 DIM DA$(10),PMPT$(10),LST$(MX,10),LK( 

MX) 

45 REM READ THE PROMPTS FOR ENTRIES 

50 FORI=lTO10sREAD PMPT$ ( I ) : NEXTI 

60 DATA LAST NAME, FIRST NAME 

70 DATA ADDRESS, CITY, STATE, ZIP 

80 DATA PHONE, BIRTHDAY, ANNIVERSARY 

90 DATA ORGANIZATION 

200 REM MENU ■ 




210 CLS:PRINT"HOME MAILING LIST" : PRINT : P 



END PROGRAM" 

ADD/EDIT/DELETE" 

PRINT LISTS" 

MERGE OR ENIER NEW L 



RINT 

220 PRINTTAB(5)"0. 

230 PRINTTAB(5)"1. 

240 PRINTTAB(5)"2. 

250 PRINTTAB(5)"3. 

1ST" 

300 REM GET SELECTION --------- 

310 PRINT: PRINT 

320 INPUT"SELECTION";S 

325 REM NEED TO CHECK THE SELECTION FOR 

A VALID MENU OFITON 

330 IF S<0 OR S>3 THEN PRINT" WRONG CHOIC 

E":GOTO320 

350 REM EXECUTE SELECTION 

360 IF S=0 THEN CLSsEND 

370 ON S GOSUB 1000,2000,3000 

390 GOTO200 



EN B is a true relational database manager. Your data is 
held in ordered sets. You impose structure by creating 
and linking sets in various ways. Prompt screens are 
automatically generated from this underlying structure. 
You define reports ordered by any set, showing directly 
or indirectly linked sets (and enforce a host of further 
conditions on the selected set members). 

What's more, ENB has an integrated data dictionary; 
structural info is carried in the database as data, just like 
everything else. This lets you restructure your database 
at will, without reblocking or reprogramming, using the 
regular editing commands. Also, exchange files contain- 
ing structural data with other ENB databases. Special 
reports on database structure are built in and (like all 
reports) are always current. 

64K data items, spans 4 disk drives (or hard disk). In- 
terfaces to BASIC , file exchange with Scripsit, VisiCalc 
and other ENB data bases. Includes 5 action tutorials, 
150 page manual. 
Developed in England by Southern Software. 

You Owe It To Your Data! 



$140 



$3 Shipping 
CA add 6% 



TRS-80 SCRIPSIT tm Radio Shack; VISICALC tm Visicor 



Sox 11721 San Francisco, CA 94101 
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400 REM GET A DATA FILE - 

410 CLS:INFUT"DO YOU WANT A NEW FILE";YN 

v 

420 IF LEFT$ (YN$,1)="N" "THEN RETURN ELSE 

IF LEFT$(YN$,1)<> ,, Y" THEN 410 
425 REM GET THE FILENAME AS A STRING 
430 INPUT"FILENAME'';FF? 
440 OPEN" I'M, FF$ 

445 REM N WILL BE THE NUMBER OF RECORDS 

READ 

450 N=0 

455 REM CHECK FOR END OF FILE FIRST 

460 IF EOF(l) THEN CLOSE s RETURN 

465 REM READ IN 1 RECORD OF TEN FIELDS 

470 N=N+1 

480 FORI=lTO10sLINE INPUT#1,LST$(N,I) sNE 
XTI 

482 REM ADD THE ITEM TO THE LINKED LIST 

483 REM NOTEs ITEMS ON DISK ARE 
ALWAYS SORTED ORDER 

485 LK(N-l)=NsPRINT LST$(N,1) sGOTO460 
500 REM ENTER DATA ITEMS - - - 

502 REM CF IS A CHANGE FLAG 

505 CF=0sCLS 

507 REM LOOP OVER THE 10 INPUT FIELDS 

510 FORI=lTO10iPRINT PMPT$(l); 

512 REM IF WE'RE EDITING (ED=1) WE'LL PR 
INT 

513 REM WHAT'S ALREADY THERE AND ASK FOR 
CHANGES 

515 IF ED=1 THEN PRINT" s " ; DA$ ( I ) : PRINT 
"CHANGES : "; 

517 REM IF NOTHING IS ENTERED INTO X$ TH 

EN CONTINUE ON 

520 INPUTX$iIF X$="" THEN NEXTIs RETURN 

525 REM IF 'END' WAS ENTERED, WE'RE DONE 

530 IF X$="END" THEN RETURN 

535 REM OTHERWISE RECORD THE CHANGE 

540 DA$(l)=X$iCF=lsNEXTI 

550 RETURN 

560 REM WAIT HERE - - - 

570 P^l^STRING?^!/'-") 

575 REM WAITS FOR AN ENTER KEY HERE 

580 INPUrPRESS ENTER TO CONTINUE" ; YN$ s R 

ETURN 

600 REM STORE DATA IN LIST ■ 

605 REM FIRST FIND SPACE FOR THE ITEM 

610 GOSUB700 

615 REM PUT THE NEW ITEM IN THAT SPACE 

620 FORI=lTO10 S LST$(LC,I)=DA$(l)sNEXTI 

625 REM NOW ADD IT TO THE LINKED LIST 

630 GOSUB800 

640 RETURN 
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650 REM SAVE DATA ----------- 

651 CIS 

655 INPUT' 8 SAVE FILE",*YN$iIF LEPT$(YN$ f l) 
="N" THEN RETURN ELSE IF LEFT? ( YN$ , 1 ) <> " 
Y" THEN 655 

660 INPUT"FILENAME";FF$ 

661 OPEN"0",l,FF$ 

662 REM STEP THROUGH THE LIST STARTING W 
ITH ITEM 

663 REM WHICH IS THE HEAD OF THE LIST 
665 LST=0 

668 REM GET THE CURRENT LINK, IF IT'S ZE 

RO, WE'RE AT THE END 

670 LK=LK(LST):IF LK=0 THEN CLOSE ! RETURN 

672 REM PRINT 1 THE ITEM TO DISK 

675 FORI=1TO10 s PRINT* 1 , LST$ ( LK, I ) : NEXTI 

677 REM PRINT THE NAME JUST TO SHOW WE'R 

E DOING SOMETHING 

680 PRINTLST$(LK,1) 

682 REM UPDATE THE LAST LINK VARIABLE 

685 LST=LKsGOTO670 

700 REM GET SPACE IN LIST ------- 

702 REM IF r rHE LIST IS AI.READY FULL, WE 
CAN'T ADD ANY MORE 

705 IF N>=MX THEN 1X^0 s RETURN 

706 REM OTHERWISE ADD IT TO THE END 

707 REM NOTE: DELETIONS AREN'T T 
AKEN INTO ACCOUNT HERE 

710 N=N+1 i LG=N: RETURN 

800 REM LINK AN ITEM INTO LIST ----- 

805 REM Vffi MUST FIND THE PLACE TO PUT TH 
E ITEM ALPHABF/riCALLY 

806 REM SO WE SEARCH FOR THE PLA 
CE WHERE IT FITS 

807 REM STARTING AT THE BEGINNIN 
G 

810 LST=0 

815 REM IF WE'RE AT THE END OF THE LIST, 

ADD IT THERE 
820 LK=LK(LST)sIFLK=0 THEN LK(LST)=IjCsLK 
(LC)=0 i RETURN 

825 REM IF THE CURRENT LOCATION IS AFTER 
THE ONE WE'RE ADDING 

826 REM THEN ADD THE NEW ITEM BE 
FORE IT 

830 IF LbT$(LK,l)>LST$(LC,l) THEN LK(LC) 

=LK(LST) :LK(LST)=LCsRETURN 

835 REM CONTINUE THE SEARCH 

840 LST=LKiGOTO820 

900 REM SEARCH FOR NAME -------- 

905 REM START AT THE BEGINNING 
910 LST=0 

915 REM IF WE GET TO THE END, WE HAVEN'T 
FOUND IT 




Icro Management 
Systems, Inc. 

2803 Thomasville Road East 

Cairo, Georgia 31728 

(912) 377-7120 



Since 1978 

• REPUTATION BACKED BY YEARS OF 
EXPERIENCE. 

• PIONEER IN DIRECT TO CONSUMER 
SALES OF MICRO COMPUTERS AND 
ELECTRONICS 

• MILLIONS OF DOLLARS IN SALES 
OVER THE YEARS 

«> TENS OF THOUSANDS OF CUSTOMERS 
° HONEST 

• RELIABLE 

• LARGE INVENTORY 

• NAME BRAND PRODUCTS 



It's simple. 



CONVENIENT ORDER ENTRY 



Ga. & Info 912-377-7120 



COMPUTERS & EQUIPMENT 



AAX-80 $369 

FX-80 $CALL 

MX-100 $CALL 

CALL - NiW PRODUCTS 




TES-80 



FROM 

Model 12 '2639 

Model 16 '4012 

MC-10 '99 

Model IV 'CALL 

Portable 'CALL 

Color Computer 'CALL 
New Products. . 'CALL 

WE CA1RY THE 
COMPLETE LIME 0¥ 
TRS-80 COMPUTERS 



PRINTERS 
Complete line 

DISCOUNT 



PRICED 
FROM 



$< 



PRINTERS 



FHOJ¥l 



$ 397 



*CALL 



GEMINI-10 
GEMINI-15 

DISCOUNT , 
PRICED 
FROM 



commodore 

COMPUTERS 

FROM ■ ** 

VIC 20 COMPUTER 

COMMODORE 64 

VIC 1541 DRIVE 

VIC 1525 PRINTER 

VIC 1530 DATASETTE 

VIC 1600 MODEM 

SOFTWARE 



P FMBiKLIN 

ACE 1000 
ACE 1200 

DISCOUNT 

PRICSD |P|*|l||| 

FROM 



compirren 



Novation 



ffl Hayes 8 



ALL PRODUCTS WE CARRY 
ARE BRAND NEW AND 
COVERED BY MANUFAC- 
TURER SPECIFIC WARRANTY 
PRICES AND PRODUCTS 
SUBJECT TO CHANGE 
WITHOUT NOTICE 



FREE UPON REQUEST 

• DISCOUNT PRICE LIST AND 

INFORMATION KIT 
o COPY OF MFR'S WARRANTY 
WRITE 

MICRO MANAGEMENT SYSTEMS 

TELEMARKET DEPT. NO. 5 
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920 LK=LK(LST):IF LK=0 THEN RETURN 

925 REM IF WHAT WE WANT IS PART OF THE C 
URRENT ENTRY, 

926 REM THEN WE'VE FOUND IT 

930 IF INSTR(LST$(LK,1),NM$)<>0 THEN RET 
URN 

935 REM IF THE CURRENT ITEM IS GREATER T 
HAN WHAT WE WANT 

936 REM THEN IT WON'T BE IN THE 
LIST AT ALL 

940 IF LST$(LK,1)>NM$ THEN LK=0j RETURN 

945 REM CONTINUE THE SEARCH 

950 LST=LKsGOTO920 

1000 REM ADD/EDIT/DELETE --- 

1010 CLS : PRINT"ADD/ EDIT/ DELETE" s PRINT: PR 
INT 

1015 REM IF FE? HAS NOTHING IN IT 
, THEN THERE'S NO FILE 

1016 REM PRESENTLY IN MEMORY 
1020 IF FF$="" THEN GOSUB400 

1030 PRINT" <A>DD <E>DIT <D>ELETE <R>ETUR 

N" 

1040 INPUT n SELECTION n ;S$ 

1050 IF S$="A" THEN GOSUB1100 

1055 IF S$="E" THEN GOSUB1200 




9 Southmoor Circle, Kettering, Ohio 45429 

[513] 294-3383 [12-6 for phone orders] 

Checks, credit card [VISA/MC], or COD accepted. 

SAME DAY SHIPMENT! 



LEAPER $15.95 tape 

$19.95 disk 

SUPER HERO $15.00 tape 



SPECIAL OFFER: 

BOTH for $25.00 

[tape only]! 




MODEL 1, 3, or 4 

LEAPER 

NEW! NOW WITH VOICE!!! 

[1 or 2 players] 
Best "Frogger-type" program 
available! Joystick or keyboard 
control. Machine language! Fast- 
action! This fantastic program 
is a solid "10"! Progressively 
more difficult levels of perform- 
ance! Rrribbitttt! 



MISADVENTURE #6 



With Sound and Graphics! 




YOU 

ARE THE 

SUPER HERO! 



A REAL 
CHALLENGE 
FOR THE 
EXPERIENCED 
ADVENTURER! 



Model I or ISI 
16K TAPE $15.00 

Can Be Transferred To Disk 



Write for our free illustrated catalog of quality 
model 1, 3, 4 and color computer games! 
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1060 IF S$="D" THEN GOSUB1300 

1070 IF S$="R" THEN GOSUB6 50s RETURN 

1080 GOTO1030 

1100 REM ADD PROCEDURE -- 

1105 REM ENTER THE DATA ITEMS 

1110 GOSUB500 

1115 REM IF WE DIDN'T ENTER AN IT 

EM THEN WE'RE DONE 

1120 IF CF=0 THEN RETURN 

1125 REM NOW STORE THE ITEM IN TH 

E LIST 

1130 GOSUB600 

1140 GOTO1100 

1200 REM EDIT PROCEDURE - - 

1205 REM SET ED TO 1 TO SAY WE'RE 

EDITING 
1210 ED=lsCLSsPRINT 8, EDIT ENTRIES" 
1215 REM WHAT DO WE WANT? 
1220 INPUT"LAST NAME (END WHEN DONE)";NM 
$ 

1225 IF NM$="END" THEN ED=0s RETURN 
1228 REM FIND THE NAME WE WANT 
1230 GOSUB900 

1232 REM SORRY, NOT IN THE LIST 
1235 IF LK=0 THEN PRINT"NOT FOUND" :GOTOl 
220 

1238 REM TRANSFER TO THE EDITING 
DATA ARRAY 

1240 FORI=1TO10 S DA$(I)=LST$(LK,I) S NEXTI 
1245 REM NOW USE THE ENTER ITEMS 
PROCEDURE 
1250 GOSUB500 

1255 REM IF THE ITEM WAS CHANGED, 
THEN REPLACE IT 

1260 IF CF=1 THEN FORI=1TO10jLST$(LK,I)= 

DA$(I)sNEXTI 

1270 GOTO1210 

1300 REM DELETE PROCEDURE 

1310 CLSsPRINT"DELETE ITEMS" 

1320 INPUT"LAST NAME (END WHEN DONE)";NM 

$ 

1330 IF NM$="END" THEN RETURN 

1335 REM FIND THE ITEM TO DELETE 

1340 GOSUB900 

1350 IF LK=0 THEN PRINT"NOT FOUND" sGGTOl 
320 

1355 REM SHOW THE ITEM FOUND AND 
CHECK FOR DELETION 

1360 CLSsFORI=lTO10iPRINTPMPT$(l);TAB(15 

)LST$(LK,l)sNEXTI 

1370 PRINTSTRING$(31, ,, »") 

1380 INPUT"DELETE THIS ITEM";YN$ 

1390 IF LEFT$(YN$,1)="N" THEN 1300 ELSE 

IF LEFT$(YN$,1)<>"Y" THEN 1380 

1400 LK(LST)=LK(LK) S GOTO1300 
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REM PRINT LISTS 



2005 

Y? 

2006 

2010 

2100 

2105 

2110 

2115 

2120 

2125 

2130 

2200 



REM 



memo: 



REM -IF NOT, GET 

IF FF$="" THEN GOSUB400 

REM PRINT LIST 

REM PRINT IN SORTED ORDER 

LS1M0 

REM GKr THE NEXT LINK 

LK=LK(LST):IF LK=0 THEN RETURN 

REM PRINT THE CURRENT ITEM 

GOSUB2 200 : LST>LK : GOT02 120 

REM PRINT ITEM 



THE 



2210 CLS 

2215 REM PRINT AN ITEM OS 

EEN 

2220 K)RI=lTOi0:PRINTPMPT$(l);TAB(15)l 

$(LK,I):NEXTI 

2225 REM NOW WAIT FOR AN ENTER 

Y 

2230 GOSUB560: RETURN 

3000 REM MERGE/SPLIT LISTS ■ 



3010 CLS:PRINT M MERGE OR INPUT LIST 
3020 INPUT"MERGE LIST";YN$ 
3030 IF LEFTS (YN$,1)= I, N ,, "THEN TO=1 ELSE 
IF LEFT$(YN$,1) = "Y" THEN YN=0 ELSE 3020 
3035 REM GET A LIST IF NOT MERGIN 

G 

3040 IF YN=1 THEN GOSUB400 ; RETURN 

3050 CLS: INPUT "FILENAME" ;FF$ 

3055 REM OPEN THE NEW FILE 

3060 OPEN" I'M, FF$ 

3065 REM STANDARD INPUT PROCEDURE 

3070 IF EOF(l) THENCLOSE : RETURN 

3075 REM GET SPACE FOR THE NEW IT 

EM, PROVIDE FOR A FULL MEMORY 

3080 GOSUB700:IF LC=0 THEN PRINT"LIST BTJ 

LL' 1 ; CLOSE : RETURN 

3085 REM READ THE NEW ITEM 

3090 FORI=1TO10:LINE INPUT* 1, LST$( LC, I) : 

NEXTI 

3092 REM PRINT THE NAME JUST SO W 

E CAN SEE SOMETHING 

3095 PRINTLST$(LC,1) 

3097 REM LINK THE NEW ITEM INTO T 

HE EXISTING LIST 

3100 GOSUB800 

3110 GOTO3070 

3200 REM SPLIT LIST 

REM CAN YOU WRITE THIS PROCE 

DURE???? 

3206 REM AND CAN YOU ADD IT TO TH 

E CODE HERE? 
3210 RETURN 




ANNOUNCES! 




• Disassemble from 

disk /memory 

• Disassemble to 

disk/printer/video 

• Automatic output 

partitioning 

• Full label generation 

• Data area screening - 

generates DB, DW 

• $40+$2 S&H 



MISOSYS 
RO. BOX 4848 
ALEXANDRIA, VA 
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Pagelist/CMD 






Produce paginated line listings and 
right justify your text 



Model I 



Rik Karlsson, Oakton, VA 



<S 



firm? 



n\y\t 






h 



v 



I hate BASIC program line 
listings! Especially the way I write 
program lines: long, complex and 
without a memory-grabbing space 
in sight. They are just plain hard to 
read. That is, until now. Oh, yes, I 
still write the same way, but now I'm 
LLISTing using PAGELIST/CMD 
and it makes all the difference. 

The Nov/Dec 1980 80-U.S. 
Journal featured an article on 
LLIST/CMD, a filter' for hardcopy 
BASIC line listings that gives the 
user a way to limit the length of any 
one printed line and also provides 
subsequent line indentations. This 
right-justified LLIST is good, but it 
was obvious that more needed to be 
done to satisfy me. So, I grabbed my 
modified- for- disk Editor-Assembler, 
Z-80 programming book, wish list of 
expected results, and went to work. 
First, I decided to use 
LLIST/CMD as the basis for my 
new program. Okay, what was at the 
top of my need list? Pagination. 

Pagination is the automatic 
halting of a hardcopy printout at the 
bottom of a page of material. This is 
important for a couple of reasons. 
One, paginated line listings are 
easier to store as a flat file than 
continuous roll ones. Second, if you 
are like me, you run off periodic 
i\ 'proofs' of work in progress to check 
' b all of that good logic. I know, some of 
you folks sit down and flowchart, 
program in BASIC away from the 



keyboard, and don't have to see 
what you've done at the machine. 
But, I'm one who loves ideas more 
than all that workup work — go with 
the flow at the keyboard, I say, and 
see what happens! That's what 
interpreted BASIC'S all about, 
right? 

Periodic proofs of line listings use 
up valuable roll paper. I've found a 
source of 'used' paper (one side clear) 
for this purpose, and since it isn't in 
rolls, I'm stuck if I don't have 
pagination, If you aren't into 
recycling, here's one area where the 
savings can come in a hurry. 
Anyway, PAGELIST/CMD pagi- 
nates or not, as you select. 

After programming pagination 
into PAGELIST/ CMD, it was time 
to 'open up' the listings for 
readability. The answer to this need 
is called linefeed-on-colon. Even the 
longest, most complex BASIC lines 
have colons to separate statements. 
Here is where money can be made in 
readability. 

Let's look at the anatomy of the 
assembly language program and see 
what's going on here (Listing 1), 

Since PAGELIST/CMD is meant 
to be used under BASIC, I added a 
step in the initialization sequence of 
the former LLIST/CMD. Now, the 
PAGELIST/CMD execution module 
is automatically protected in high 
RAM by resetting the DOS top of 
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memory pointer at 4049H. Lines 810 
and 820 do this. 

Lines 830-890 prompt the user for 
a maximum line length. The default 
value is 64 characters. An 
<ENTER>, instead of a number, in 
response to this query, is an 
acceptance of the default value and 
advances the program to a prompt 
for number of indentation spaces 
desired. 

Lines 900-990 ask for and get the 
space response. Note that lines 950- 
970 insure that line length exceeds 
spaces requested. These two 
requests and queries are almost the 
same as programmed in LLIST/ 
CMD. 

Lines 1000-1060 are new code, and 
request a yes or no response to 
whether pagination is desired. If it 
is, the indicator byte at TMODE' is 
set to one. An <ENTER> or 'N' 
answer advances the program to the 
next request, leaving pagination off. 
Lines 1070-1140 ask for a yes or no 
response to activating the colon-on- 
linefeed option. A 'Y' causes the 
colon comparison code to be 
completed in the execution module. 
Line 1150 is the end of 
initialization and jumps the 
program to DOS READY. 

The INPUT routine, lines 1160- 
1320, is all new code as compared to 
LLIST/CMD. First, it uses the Level 
2 input routine at address 0040H to 
wait for, and get, a user response. An 
RST 16 is executed to analyze the 
input. If a number is found, the carry 
flag is set and a RETurn is executed. 
Notice in the code after CALL 
INPUT (in the initialization area), 
how the carry flag is used to direct 
traffic. 

If no decimal number is present, a 
check for an <ENTER> is made. If 
found, the Z flag is set and a RETurn 
is executed. The Z flag also is set for 
an 'N' response. Notice again, how 
the Z flag directs program flow in 
the initialization module. 

If neither number, <ENTER> nor 
'N' is found to be input, a 'Y' is 
looked for. No 'Y', no RETurn— an 
Tnput Error!' message is displayed. 
The messages in PAGELIST/ 
CMD are printed by a CALL to 
4467H. This is a generalized DOS 
print-to-screen routine which 
recognizes a 03H or 0DH stop byte. I 
added a few touches to the request 
messages for clarity. Lines 1360- 



1500 are the messages. 

PAGELIST/CMD is really two 
separate programs, if you will. The 
initialization module beginning at 
label 'START' is actually a program 
that configures the execution 
module according to the user's 
wishes. Once used, the initialization 
module becomes irrelevant to 
PAGELIST operation. Notice that it 
is ORGed low in memory and really 
could be almost anywhere. The 
execution module starting at label 
'LLIST', however, is the workhorse 
routine of PAGELIST. 

PAGELIST's execution module is 
a 'filter'. Its job is to sit between the 
printer and the ROM LLIST/ 
LPRINT code and insure that 
hardcopy printing is carried out 
according to the user's desires. 
Inserting PAGELIST into the line of 
events is accomplished by lines 750- 
780 of the initialization module. 

Okay, now that our gatekeeper to 
the printer is on the job, how does he 
do what we have asked him to do? 
First, the C register contains the 
byte enroute to the printer. Lines 
1520-1590 compare that byte with 
three codes of interest; carriage 
return, top of form and quote mark. 
The first two cause execution to be 
routed to a few bytes of code that 
reset the line character counter back 
to zero, then prints the code. 
Remember, we've specified a 
maximum line length acceptable, so 
that every time a linefeed is 
executed, the character counter 



must be reset to a starting value. 

The recognition of a quote mark 
causes a swapping of bytes at 
FF50H. This is Mister Toggle. He 
gets the present value of the 
comparison byte at location 
'CKQTE+1' (address FF4AH), and 
reverses it. If it is a zero, he makes it 
a one, a one becomes a zero. Why? 
Because that byte controls the 
linefeed on colon function later on, 
as we will see. If none of the three 
comparisons are found to be true, the 
character counter is incremented by 
one and another comparison is 
attempted. 

The byte at 'CLCPR' plus one, is 
initialized to the ASCII code for a 
colon upon user selection of the 
linefeed-on-colon option. If no colon 
is detected, execution falls through 
to check for maximum line length. If 
the line is at that length, a carriage 
return is effected. If not, the byte is 
printed normally, and we're back to 
line 1520. 

If a colon is detected, a jump is 
made to 'CKQTE'. Okay, if Mister 
Toggle is a one, execution is routed 
back upstream for normal handling. 
Why? Because a one will appear 
only if just one quote mark has been 
encountered, meaning that a colon 
has been detected within a quoted 
string. Since the only colons of 
interest are between BASIC 
program statements, no action is 
taken. If Mister Toggle is a zero, an 
even number of quotes (or none at 
all) has been detected, and the colon 



Listing 1 — PAGELIST Assembly Language Program 



UciiuU 
00110 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00260 
00270 
00280 
00290 
00300 
00302 
00304 



PAGELIST/CMD 

BY RIK KARLSSON 

3103 FOX MILL ROAD 

OAKTON, VIRGINIA 22124 

THIS IS A GREATLY MODIFIED VERSION OF LLIST/CMD 
WHICH APPEARED IN 80-U.S. MAGAZINE OF NOV/DEC 1980. 
THIS PROGRAM ONLY RUNS UNDER A DISK OPERATING SYSTEM. 

THE KEY DIFFERENCES BETWEEN THIS PROGRAM AND LLIST/CMD 
INCLUDE THE PAGINATION OPTION, LINEFEED ON COLON OPTION, 
AND THE USE OF SOME DOS ROUTINES TO PRINT THE MESSAGES. 
THE INPUT ROUTINE CALLS LEVEL-II ROM AS WELL. WHEN 
INITIALIZING, <ENTER> ALWAYS ADVANCES THE USER TO THE 
NEXT INPUT PARAMETER THUS FORCING A REVIEW AND 
ACCEPTANCE OF EACH ONE. 

SUBROUTINES TO HANDLE THE PAGINATION OPTION ARE ADDED 
AS 'PGREQ'/MODE' AND 'HOLD.' LINEFEED ON COLON IS 
ACTIVATED BY 'COLON' AND RECOGNIZED AT 'CLCPR.' 
THE BYTE AT 'CKQTE'+l IS TOGGLED SO THAT NO LINEFEED 
WILL OCCUR ON A COLON ENCLOSED IN QUOTES. 
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is acted upon. 

Now, execution falls through to 
carriage return, reset character 
counter, and check-page-length-in- 
lines subroutines. Line 1840, 'CALL 
MODE', executes a subroutine that 
increments the counter for number 
of lines printed, then checks for end 
of page. If 57 lines is detected, a 
message is displayed, and a wait for 
<ENTER> loop begun. <ENTER> 
causes execution to continue by 
entering spaces at the head of the 
next line and, finally, the next 
character being printed. Whew! 

And, it happens that way for each 
character printed, folks. "But, what 
if I want to change the parameters? 
Do I have to go back to DOS and 
start all over again?" No, Virginia, 
there is a Santa Glaus in two forms, 
PAGELIST/BAS, a companion 
program, or direct command input 
of parameters. The direct command 
input mode is fully covered in the 
lead in (Listing 1, lines 430-690) 
documentation to the assembly 
language program listing. In most 
cases, only the line counter reset is 
actually needed in practice. To reset 
the line counter to zero following 
completion of a full program line 
listing, 'POKE &HFF94,0.' For 
those few times when a more 
extensive reconfiguration is 
required, the PAGELIST/BAS 
BASIC program is more thorough, 
capable and automatic. 

Here is what the PAGELIST/BAS 
program is all about. 

Recall that PAGELIST/CMD was 
composed of two separate programs, 
an initialization/configuration 
module and an execution module. 
The execution module is the only 
part of the composite left operative 
in memory after initialization. 

PAGELIST/BAS (Listing 2) is 
RUN under BASIC and is a BASIC 
language configuration module for 
the PAGELIST machine code 
execution module. When RUN, it 
first checks to see that the execution 
module is indeed active. This is 
accomplished by examining the 
lineprinter device control block 
(DCB). If the DCB printer driver 
address points to the start address of 
the execution module, we're in 
business. If not, the fact is reported, 
and the BASIC program is 
terminated. To use PAGELIST in 
this case, you will have to start over 
66 Basic Computing 







00310 






00320 






00330 






00340 






00350 






00360 






00370 






00380 






00390 






00400 






00410 






00420 






00430 






00440 






00450 






00460 






00470 






00480 






00490 






00500 






00510 






00520 






00530 






00540 






00550 






00560 






00570 






00580 






00590 






00600 






00610 






00620 






00630 






00640 






00650 






00660 






00670 






00680 






00690 






00700 






00710 






00720 






00730 


8000 




00740 


8000 


2A2640 


00750 


8003 


2254FF 


00760 


8006 


2260FF 


00770 


8009 


2268FF 


00780 


800C 


2120FF 


00790 


800F 


222640 


00800 


8012 


2B 


00810 


8013 


224940 


00820 


8016 


219980 


00830 


8019 


CD6744 


00840 


801C 


CD6780 


00850 


801F 


3007 


00860 


8021 


CD5A1E 


00870 


8024 


7B 


00880 


8025 


323 9FF 


00890 


8028 


211781 


00900 


80 2B CD6744 


00910 


802E 


CD6780 


00920 


8031 


300D 


00930 


8033 


CD5A1E 


00940 


8036 


3A39FF 


00950 


8039 


BB 


00960 


80 3A 38EC 


00970 


803C 


7B 


00980 


803D 


325CFF 


00990 


8040 


213A81 


01000 


8043 


CD6744 


01010 


8046 


CD6780 


01020 


8049 


38F5 


01030 


804B 


2804 


01040 


804D 


2198FF 


01050 


8050 


34 


01060 


8051 


215481 


01070 



;ALSO ADDED IS AN AUTOMATIC MEMORY PROTECT FEATURE 

;AT INITIALIZATION WHICH SETS THE DOS MEMORY SIZE 

; POINTER AT 4049H TO THE START OF THE EXECUTION MODULE 

MINUS ONE BYTE. THE USER CAN NOW ENTER BASIC, LOAD AND 
RUN A PROGRAM AND THEN BE ABLE TO LLIST WITH THE 
PARAMETERS SET WITHOUT SETTING MEM SIZE. IT MUST BE 
NOTED THAT SINCE THIS ROUTINE RUNS AS A FILTER 
BETWEEN THE BASIC ROM ROUTINES AND THE PRINTER 
OUTPUT ROUTINE, ANY PRINTING TO HARDCOPY BE AFFECTED 
BY PARAMETERS SET FOR PAGELIST. 

PAGELIST/CMD PARAMETERS CAN BE RESET FROM BASIC. THIS 
IS IMPORTANT IF THE USER LLISTS MORE THAN ONE PROGRAM. 
THE PAGINATION COUNTER MUST BE RESET TO ZERO BEFORE 
ATTEMPTING ANOTHER LLIST. TO RESET THE PAGE COUNTER 
TO ZERO, IN BASIC COMMAND MODE, ENTER: 
POKE &HFF99,0 

TO RESET THE NUMBER OF SPACES FROM BASIC, ENTER: 
POKE &HFF5C, <NUMBER OF SPACES> 

NOTE: THE NUMBER OF SPACES MUST BE LESS THAN LINE LENGTH 

TO RESET THE LINE LENGTH FROM BASIC, ENTER: 
POKE SHFF39, <LENGTH DESIRED> 

TO TURN OFF THE PAGINATION FEATURE FROM BASIC, ENTER: 
POKE &HFF98,0 

TO RESET THE NUMBER OF LINES PER PAGE, ENTER: 
POKE &HFF76, <LINES DESIRED> 

TO NEGATE TO LINEFEED ON COLON FEATURE, ENTER: 
POKE &HFF34,0 

THE COMPANION PROGRAM PAGELIST/BAS WILL ALLOW AUTOMATIC 
ACCESS TO AND CHANGE OF PAGELIST/CMD PARAMETERS UNDER 
BASIC. THE PROGRAM IS PRESENTED SEPARATELY. 

MARCH 28, 1981 ROLLINGCREST 



START 



LINE 



SPREQ 



PGREQ 



COLON 



ORG 


8000H 


; ORIGIN INIT MODULE 


ID 


HL, (4026H) 


•GET LP DRIVER ADDRESS 


ID 


(DRIVER+1),HL 




ID 


(DRIV2+1),HL 




ID 


(ENDIT+1),HL 




ID 


HL, LLIST 


•EXECUTION MODULE STAR 


ID 


(4026H),HL 




DEC 


HL 


;BACK ONE SPACE 


ID 


(4049H),HL 


; PROTECT MEMORY 


ID 


HL,MSG0 


•FIRST MESSAGE 


CALL 


4467H 


; DISPLAY IT 


CALL 


INPUT 


•GET RESPONSE 


JR 


NC, SPREQ 


;BYE 


CALL 


1E5AH 


•CONVERT TO HEX 


ID 


A,E 


;GET LSB 


ID 


(MAXLEN+1),A 


'SET LINE LENGTH VALUE 


ID 


HL,MSG1 


;NEXT MESSAGE 


CALL 


446 7H 


•DISPLAY IT 


CALL 


INPUT 


;GET RESPONSE 


JR 


NC, PGREQ 


•BYE 


CALL 


1E5AH 


^CONVERT TO HEX 


ID 


A, (MAXLEN+1) 


•GET LINE LENGTH 


CP 


E 


; COMPARE TO SPACES 


JR 


C, SPREQ 


TOO MANY, TRY AGAIN 


ID 


A,E 


OKAY, GET LSB 


ID 


(NUMSPC+1),A 


SET SPACES NUMBER 


ID 


HL,MSG2 


PAGINATION REQUEST 


CALL 


4467H ; 


DISPLAY IT 


CALL 


INPUT 


GET (Y/N) RESPONSE 


JR 


C, PGREQ 


A NUMBER INPUT 


JR 


Z, COLON ; 


A 'N' INPUT 


ID 


HL,PMODE 


A *Y' INPUT 


INC 


(HL) 


SET MODE BYTE TO 'ON' 


ID 


HL,MSG3 ; 


COLON ON REQUEST 
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from DOS. 

When PAGELIST is active, the 
BASIC program reports the total 
present configuration of the 
execution module. Figures 1 and 2 
show typical screen displays. 

The user is offered a chance to 
change the parameters. Figure 3 
shows a typical question and 
response sequence. An <ENTER> 
in response to any query is accepted 
as a bye, and that parameter is left 
unchanged. After the last query is 
answered, the program automatical- 
ly cycles to the initial report mode 
for checking by the user. Answering 
an 'N' to the change parameters 
query ENDs the program by 
DELETEing PAGELIST/BAS from 
memory. 

The way I use PAGELIST/BAS is 
to maintain it in ASCII form on disk 
(SAVE "PAGELIST/BAS: d", A"). 
In this way, it can be MERGEd with 
any BASIC program in memory, 
and RUN without harm to it. Of 
course, the line numbering system of 
one through 10 was chosen for this 



8054 CD6744 
8057 CD6780 
805A 38F5 
805C 2806 
805E 2134FF 
8061 3E3A 

8063 77 

8064 C32D40 
8067 219580 
806A 0603 
806C CD4000 
80 6F 2B 

8070 D7 

8071 D8 

8072 D60D 

8074 C8 

8075 D641 

8077 C8 

8078 FE0B 
80 7A 2002 
807C 3C 
807D C9 
807E 218680 
8081 CD6744 
8084 18E1 
8086 49 
8094 03 
0004 

8099 1C1F 
809B 20 
80B4 1A1D 
80B6 20 
80CE 1A1D 
80D0 2D 
80F2 LAID 



01090 

01100 

01110 

01120 

01130 

01140 

01150 QUIT 

01160 INPUT 

01170 

01180 

01190 

01200 

01210 

01220 

01230 

01240 
01250 

01260 

01270 

01280 

01290 

01300 ERROR 

01310 

01320 

01330 ERRMSG 

01340 

01350 BUFF 

01360 MSG0 

01370 

01380 

01390 

01400 

01410 

01420 



CALL 

CALL 

JR 

JR 

LD 

ID 

LD 

JP 

LD 

LD 

CALL 

DEC 

RST 

REr 

SUB 

RET 
SUB 
RET 
CP 

JR 

INC 

RET 

LD 

CALL 

JR 

DEFM 

DEFB 

DEFS 

DEFW 

DEFM 

DEFW 

DEM 

DEFW 
DEFM 
DEFW 



4467H 
INPUT 
C, COLON 
Z,QUIT 
HL,CLCPR+1 
A,':' 
(HL),A 
402DH 
HL,BUFF 
B,3 
0040H 
HL 
16 
C 

0DH 
Z 

41H 
Z 

0BH 

NZ, ERROR 
A 

HL, ERRMSG 

4467H 

INPUT 

'INPUT ERRORl 

03H 



; DISPLAY IT 

;GET (Y/N) RESPONSE 

;A NUMBER INPUT 

;A 'N' INPUT 

;WHERE COMPARE BYTE GOES 

; COLON ASCII CODE 

;PUT INTO PLACE 

;INIT DONE, GO TO DOS 

; POINT TO INPUT BUFFER 

;MAX INPUT LENGTH 

;WAIT FOR RESPONSE 

;BACK ONE 

; CHECK OUT INPUT 

;A NUMBER, GO BACK 

;A <CR>? 

;YES, GO BACK 

;A 'N'? 

;YES, GO BACK 

;A YES? 

;NO, ANSWER UNACCEPTABLE 

;SET FLAGS 

;GO BACK 

; POINT TO ERROR MESSAGE 

; DISPLAY IT 

;GO BACK FOR INPUT 



4 
1F1CH 



1D1AH 



1D1AH 



; TERMINATOR 
;MAX OF 4 
; CLEAR SCREEN 
PAGELIST PROGRAM' 

BY RIK KARLSSON' 



1D1AH 




■P 



—all 

Hill 
Jill 

JH 

IPlilil 

IM 
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reason. Just insure that the resident 
BASIC programs, with which 
PAGELIST/BAS will be merged, 
have lines beginning above number 
10. 

Not to belabor the obvious, but 
there may be occasions when a 
'high' version of PAGELIST/BAS is 
desired— when a BASIC program to 
be LLISTed uses lines 1-10. You 
could make a PAGELIST/BAS with 
line numbers from, say 65520-65529. 
In this case, to operate it, MERGE, 
then 'RUN 65520' rather than RUN 
as the start command. 

So, there you have it. Assemble 
PAGELIST/CMD, then key in and 
save PAGELIST/BAS (with ASCII 
option), and you are on your way to 
meeting your conviction. And, you 
know, it really is a better way! 

Figure 1 

PAGELIST Parameters 
PAGINATION <OFF> 
LINEFEED ON COLON <OFF> 
LINE LENGTH = 64 
SPACES = 2 
CHANGE PARAMETERS (Y/N)? 

N 
READY 
>< 

Figure 2 

PAGELIST Parameters 

PAGINATION <ON> - LINES 

PER PAGE = 57 
LINE COUNTER = (zero) 
LINEFEED ON COLON <ON> 
LINE LENGTH = 64 
SPACES = 2 
CHANGE PARAMETERS (Y/N)? 

N 
READY 
>< 

Figure 3 

PAGELIST Parameters 

PAGINATION <ON> - LINES 

PER PAGE = 57 
LINE COUNTER = 33 
LINEFEED ON COLON <ON> 
LINE LENGTH = 64 
SPACES = 2 
CHANGE PARAMETERS (Y/N)? 

Y 
DISCONNECT PAGELIST/CMD 

FROM SYSTEM (Y/N)? N 
CHANGE PAGINATION STATUS 

(l=ON 0=OFF)? 1 
RESET LINE COUNTER (Y/N)? Y 
CHANGE LINES PER PAGE? 57 
68 Basic Computing 



80F4 45 


01430 


DEFM 


'ENTER MAX : 


LINE LENGTH (DEFAULT=64) ' 


8116 03 


01440 


DEFB 


03H 


; TERMINATOR 


8117 45 


01450 MSG1 


DEFM 


'ENTER NUMBER OF SPACES (DEFAULT=5) ' 


8139 03 


01460 


DEFB 


03H 


; TERMINATOR 


81 3A 50 


01470 MSG2 


DEFM 


'PAGINATION 


DESIRED (Y/N)?' 


8153 03 


01480 


DEFB 


03H 


? TERMINATOR 


8154 4C 


01490 MSG3 


DEFM 


'LINEFEED ON COLON (Y/N)?' 


816C 03 


01500 


DEFB 


03H 


; TERMINATOR 


FF20 


01510 


ORG 


0FF20H 


; EXECUTION MODULE, 48K 


FF20 79 


01520 LLIST 


LD 


A,C 


; OUTPUT CHARACTER 


FF21 FE0D 


01530 


CP 


0DH 


;A <CR>? 


FF23 2819 


01540 


JR 


Z, OUTCR 


;YES, HANDLE IT 


FF25 FE0C 


01.550 


CP 


0CH 


7 TOP OF FORM CODE? 


FF27 2815 


01560 


JR 


Z,OUTCR 


7 SAME AS <CR> 


FF29 E5 


01570 


PUSH 


HL 


;SAVE POINTER 


FF2A FE22 


01580 


CP 


111! 


;A QUOTE? 


FF2C CC8CFF 


01590 


CALL 


Z, QUOTE 


7 THEN TOGGLE BYTE 


FF2F 2197FF 


01600 


LD 


HL,TEMP 


7 CHARACTER COUNT BYTE 


FF32 34 


01610 


INC 


(HL) 


; COUNT ONE MORE 


FF33 FE00 


01620 CLCPR 


CP 





; COLON COMPARE OPTION 


FF35 2812 


01630 


JR 


Z,CKQTE 


;DO IT ON MATCH 


FF37 7E 


01640 


LD 


A, (HL) 


7 GET VALUE 


FF38 FE40 


01650 MAXLEN 


CP 


64 


7 MAX LINE LENGTH REACHED? 


FF3A 2812 


01660 


JR 


Z,CRLF 


? YES, SEND A <CR> 


FF3C 1828 


01670 


JR 


ENDIT-1 


7 NO, OUTPUT CHARACTER 


FF3E E5 


01680 OUTCR 


PUSH 


HL 


7 SAVE POINTER 


FF3F 2197FF 


01690 


LD 


HL,TEMP 


7 CHARACTER COUNT BYTE 


FF42 3600 


0.1700 


LD 


(HL),0 


7 RESET COUNT TO ZERO 


FF44 CD6AFF 


01710 


CALL 


MODE 


7 SEE IF PAGINATION ON 


FF47 181D 


01720 


JR 


ENDIT-1 


?NOW GO ON 


F.F49 3E00 


01750 CKQTE 


LD 


A,0 


7 GET IT 


FF4B B7 


01770 


OR 


A 


7 CHECK IT 


FF4C 20E9 


01780 


JR 


NZ,MAXLEN-1 


? A ONE, NO <CR> 


FF4E CS 


01790 CRLF 


PUSH 


BC 


? SAVE REGISTERS 


FF4F 0E0D 


01800 


LD 


C,0DH 


7<CR> CODE 


FF51 3601 


01810 


LD 


(HL),1 


7. RESET CHAR COUNT TO ONE 


FF53 CD0000 


01820 DRIVER 


CALL 


$-? 


7 OUTPUT TO PRINTER 


FF56 E5 


01830 


PUSH 


HL 


7 SAVE TEMP LOCATION 


FF57 CD6AFF 


01840 


CALL 


MODE 


7 PAGINATION ON? 


FF5A El 


01850 


POP 


HL 


7 RESTORE 


FF5B 0605 


01860 NUMSPC 


LD 


B,5 


7 NUMBER SPACES TO PRINT 


FF5D 0E20 


01870 LOOP 


LD 


C,20H 


7 SPACE ASCII CODE 


FF5F CD0000 


01880 DRIV2 


CALL 


?-? 


7 PUT TO PRINTER 


FF62 34 


01890 


INC 


(HL) 


7 CHAR COUNTER UP ONE 


FF63 10F8 


01900 


DJNZ 


LOOP 


7 DO TIL DONE 


FF65 a 


01910 


POP 


BC 


? RESTORE 


FF66 El 


01920 


POP 


HL 


7 RESTORE 


FF67 C30000 


01930 ENDIT 


JP 


$-$ 


? BACK TO PRINTER 


FF6A 2198FF 


01940 MODE 


ID 


HL, PMODE 


7 PAGINATION ON/OFF BYTE 


FF6D 7E 


01950 


.LD 


A, (HL) 


7 GET IT 


FF6E B7 


01960 


OR 


A 


7 IS IT ON? 


FF6F C8 


01970 


RET 


Z 


7NO, GO BACK 


FF70 2199FF 


01980 


LD 


HL, COUNT 


7YES, POINT TO COUNTER 


FF73 34 


01990 


INC 


(HL) 


7 UP IT ONE 


FF74 7E 


02000 


LD 


A, (HL) 


7 GET VALUE 


FF75 FE39 


02010 


CP 


57 


7 MAX LINES ALLOWED? 


FF77 2801 


02020 


JR 


Z,HOLD 


7 YES, WAIT FOR PAGE 


FF79 C9 


02030 


RET 




7 NO, KEEP GOING 


FF7A 219AFF 


02040 HOLD 


LD 


HL,MSG4 


? POINT TO WAIT MESSAGE 


FF7D CD6744 


02050 


CALL, 


4467H 


? DISPLAY IT 


FF80 CD4900 


02060 


CALL, 


0049H 


7WAIT TIL <CR> 


FF83 CDC901 


02070 


CALL 


01C9H 


7 CLEAR SCREEN 


FF86 219 9FF 


02080 


LD 


HL, COUNT 


7 POINT TO COUNTER 


FF89 3600 


02090 


LD 


(HL),0 


7 RESET TO ZERO 


FF8B C9 


02100 


RET 




7 GO BACK NOW 


FF8C 214AFF 


02110 QUOTE 


LD 


HL,CKQTE+1 


7 GET INDICATOR BYTE 


FF8F 7E 


02120 


LD 


A,(HL) 


. 


FF90 B7 


02130 


OR 


A 


7 IS IT ZERO? 


FF91 2802 


02140 


JR 


Z,ONE 


?YES, THEN MAKE ONE 


FF93 35 


02150 


DEC 


(HL) 


7 MAKE A ZERO 


FF94 C9 


02160 


RET 




7 RETURN 


FF95 34 


02170 ONE 


INC 


(HL) 


7MAKE A ONE 


FF96 C9 


02180 


RET 




7 RETURN 


FF97 00 


02200 TEMP 


DEFB 





? CHARACTER COUNTER 


FF98 00 


02210 PMODE 


DEFB 





? PAGE MODE INDICATOR 


FF99 00 


02220 COUNT 


DEFB 





7 LINE COUNTER BYTE 


FF9A LAID 


02230 MSG4 


DEFW 


1D1AH 
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CHANGE SPACES? 2 
CHANGE LINE LENGTH? 64 
CHANGE LINEFEED ON COLON 
STATUS (1= ON 0=OFF)? 1< 



FF9C 43 
FFB7 0D 



02240 DEEM 
02250 ZEND DEFB 
02260 END 

00000 TOTAL ERRORS 

27936 TEXT AREA BYTES LEFT 



'CHANGE PAGE - PRESS <ENTER> ' 

0DH ; TERMINATOR 

START ; AUTOSTART AT INIT 



Listing 2 - PAGELIST BASIC Program Listing 

1 IFPEEK(&H4027)<>&HFFANDPEEK(&H4026)<> 
&ti20CLSsPRINT@512/'PAGELIST/CMD NOT A 
CTIVE : " s PRINT : DELETEl-11 

2 CLSsPRINT"PAGELIST PARAMETERS"! PRINTS 

TRINGS ( 33 , 45 ) : IFPEEK( &HFF98 ) =1PRINT"P 

AGINATION <ON> - LINES PER PAGE = ";P 

EEK(&HFF76);PRINT"LINE COUNTER = ";PE 

EK( &HFF99 ) s ELSEPRINT "PAGINATION <OFF> 
ii 

3 PRIlSrr"LINEFEED ON COLON " ; : IFPEEK( &HF 

F34 ) <> lTIiENPRINT" <ON> "ELSEPRINT" <OFF> 
it 

4 PRINTLINE LENGTH = ";PEEK(&HFF39) :PR 
INT"SPACES = " ? PEEK(SHFF5C)sINPUT u CHA 
NGE PARAMETERS (Y/N) ";CP$iIFCP$<> ,t Y"T 
HENDELETE1-11 

5 CP$=""sINPUT"DISCONNECT PAGELIST/CMD 
FROM SYSTEM (Y/N) "?CP$sIFCP$= ,, Y"THENP 
OKE&H4026, PEEK(&HFF54) :POKE&H4027,PEE 



K(&HFF55):KUN 

6 A=PEEK(&cHFF98);INPUT"CHANGE PAGINATIO 
N STATUS (l=ON 0=OFF) ";A:IFA<2POKE&HF 
F98,AsCP$="N"sIFA=lINPUT"RESEr LINE C 
OUNTER (Y/N)";CP$sIFLEFT$(CP$,l)="Y"A 
NDRIGHT$ (CP$ , 1 ) = ,I Y "THENPOKE&HFF99 , 0EL 
SEPOKE&HFF99,VAL(RIGHT$ (CP$,LEN(CP$)- 

D) 

7 A=PEEI^(&HFF76)sINPUT"CHANGE LINES PER 

PAGE" ; As IFA>0POKE&HFF76, A 

8 A=PEEK(&HFF5C)sINPUT"CHANGE SPACES"? A 
% IFA>0POKE&HFF5C, A 

9 A=PEEK(ScHFF39);INPUT"CHANGE LINE LENG 
TH" ; As IFA<PEEK( &HFF5C )THEN9ELSEPOKE&H 
FF39,A 

10 POKE&HFF34,&H3AsINPUr"CHANGE LINEFEE 
D ON COLON STATUS (l=ON 0=OFF) ";A:IFA 
=0POKE&HFF34,1 

11 GOr02 




Printer Specials 

(Epson F0G80 $389 



Gpson RC-80 pm $525 

G€MINI 10 $299 
GGV\INI 1 5 $469 

Prowriter I iSd? $559 
ProuuritGr II $655 

Modem Special 

Mark I Modem uu/froo subscription to source $75 

Diskette Specials 

Elephants SS/SS $ 16.95 
GophQnts DD/DD $20.99 

To Order Coll or Write: 

Tectm Computer Products 

170 Donfel Rood 

Homden, Conn. 0651 7 

(203) 288-5772 



TBSTUi 
t 



lool 'q; 

Tape Reproduction System 
Tape or Disk 



TRSDUM 

t 



Utility for Model 1, 3, 4 

• Read, Write, Verify tape or disk files 

• Read and Write any TRS-80 std. protocol tape 

• Automatically identifies file type (e.g. BASIC, 
SYSTEM) 

• Change tape file name as desired 

• Change speed of tapes, if desired (Mod 3, 4) 
® Select cassette port or 1 (Mod 1) 

• OFFSET memory load addresses automatically 
® UNOFFSET load addresses, if offset 
® Displays full operational status plus . . . 

- diskette directory 

- load map (start-end address sets) 

- Name, Length, Format of files loaded 

- Start, End, Execute addresses of programs 

- Error messages, if any 

• Automatic tape/disk protocol conversion 

• Single disk-drive copy capability 
© Archive disk files on tape to save diskettes 

• Run tape programs from disk 
(Tape SCRIPSIT, EDTASM, games, etc.) 

• All disk features require TRSDUM 
TRSTUM — for cassette-based systems ONLY $16.95 
TRSDUM — for TRSDOS disk systems ONLY $17.95 

Please specify Model 1, 3 or 4 
and add $2.00 postage and handling. 

Send check, money order or SASE to 

CRB Microtools 

"Software Malls for the 80's" 

14835 N. First Ave. 

Phoenix, AZ 85023 

TRS-80, TRSDOS, SCRIPSIT are trademarks of TANDY CORP. 
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PRINT — the most used, least 
glamorous, yet most versatile state- 
ment in BASIC. Not only does it dis- 
play what we ask, it also calculates 
before it prints. Let's look at it: 
linenumber PRINT item list 

The item list can be text, numbers, 
variables, expressions, or any com- 
bination of these. Here's a simple 
routine using strings: 
10 PRINT "This is a string" 
20 A$ = "This is also a string" 
30 PRINT A$ 

Line 10 prints the text of the string 
(called a string literal) within the 
quotation marks. Line 20 assigns 
text to variable A$ and line 30 prints 
this text as the contents of variable 
A$. 

Here's a simple routine using 
numbers: 

100 PRINT 123 

110 PRINT 1 + 2 

120 A=2 : B=3 

130 PRINT A + B 

140 PRINT (A + B 4- 4) * B/2 

Simple, but consider the many 
things the PRINT statement is 
doing. In line 100, it prints a number. 
In line 110, it calculates the value 
then prints it. In line 130, it obtains 
the values of the variables, calcu- 
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lates their total, and then prints it. 
In line 140, it performs calculations 
on variables and numbers before 
printing the result. 

A PRINT statement with nothing 
in its item list (e.g., 15 PRINT) will 
print a blank line. Add a few PRINT 
statements to the above routines at 
lines 15, 35, 105, and 135. With these 
changes, the text prints on every 
other line. You can insert PRINT 
statements into your programs to 
double-space your lines and make 
them easier to read. 

Print Operators 

Once something has been printed, 
the cursor returns to the beginning 
of the next line and waits for another 
PRINT statement. BASIC uses the 
semicolon and comma punctuation 
marks (called operators) to change 
this. The semicolon (;) tells the 
cursor not to move. The next 
character printed will immediately 
follow the last. 

Positive numbers, or numeric 
variables, print with leading and 
trailing spaces. Try this: PRINT 
"XXX";123;"XXX." Note the spaces 
before and after the number. Now, 
print it again with -123 as the 
number. The trailing space remains, 



but a minus sign has been printed in 
the leading space. 

The comma (,) acts like a pre-set 
tab on a typewriter. The screen has a 
"print zone" every 16 columns. The 
comma in a PRINT statement ad- 
vances the cursor to the next print 
zone before printing the next item. 

Using a trailing comma in a FOR 
. . . NEXT loop to advance the cursor 
can be tricky. This is especially true 
if your screen and your printer have 
a different number of print zones (or 
if you're changing a program from a 
computer with a different sized 
screen). 

This program prints properly on a 
Model I or III (which have four print 
zones): 

10 PRINT "Col. 1", "Col. 2", Col. 3" 
"Col. 4" 

20 FOR X=l TO 12 
30 PRINT X, 
40 NEXT X 

Line 10 prints the headings, "Col. 
1", etc. Line 30 then prints three 
rows of four columns of numbers 
below the headings. 

If you try LPRINTing this on an 
80-column printer, or running it on a 
Model II (which has five print zones 
on its screen), you'll find it's printing 
five columns of numbers. There are 
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several ways to handle this (e.g., 
counting the times it prints and after 
it has printed four times including a 
PRINT statement to bring the 
cursor to the next line — 35 K=K+1 : 
IF K=4 THEN PRINT : K=0). The 
point is that if you encounter this 
kind of situation, you'll have to 
figure out what the output should 
look like and revise the program to 
print properly. 



The comma allows us to print at 
pre-set tab locations. The TAB 
function lets us set our own 
locations. Its form is TAB {position). 

The position number may be any 
number, variable, or expression 
with a value from to 255, TRS-80 
columns are numbered from zero to 
the number of screen columns minus 
1 (i.e., zero to 31 on the Color 
Computer, zero to 63 on Models I and 
III, zero to 79 on Models 2 and 16). If 
the TAB position is set greater than 
the number of columns, it will be 
^modulo" 32, 64, or 80 screen width 
(i.e., the computer will subtract mul- 
tiples of the screen width from the 
indicated position to get to a valid 
column, then print at that column). 

A TAB function may be entered in 
the PRINT item list wherever 
needed. It moves the cursor to the 
tab column and begins printing 
there. Try this simple program: 

10 A=5 : B=10 BHttSHH 
20 PRINT "X"; TAB (A); "Y"; TAB 

(A+B) A-hB 

This prints the character "X" at 
column zero, then at column five it 
prints the number five, immediately 
followed (after the trailing space) 
by the character "Y", and the 
number 15 prints at column 15, This 
shows several things being printed 
from one item list. 

The TAB function won't move the 
cursor backward. If the cursor is 
past the position specified, TAB will 
be ignored and whatever is to be 
printed will be printed at the 
existing cursor position, 

PRINT (S> 

TRS-80 owners are fortunate to 
have the PRINT @ statement — 
most microcomputers don't have it. 
This handy statement allows you to 
print anywhere you want on the 
screen, (Note: it's for screen display 
only, there's no way to LPRINT @.) 



Its form is: 

linenumber PRINT @ location, 

item list 

There are 1024 print locations (64 
columns by 16 rows) on Models I and 
III, 1,920 on Models II and 16, and 
512 on the Color Computer. They 
start at location zero in the upper left 
and go to number 1,023, 1,919, or 511 
at the lower right. Your BASIC 
manual has a video display map 
showing the locations and numbers. 
The PRINT @ statement starts 
printing at the stated location. The 
location may be a number, variable, 
or expression. 

Looking up the print location 
every time a PRINT @ statement is 
to be used discourages many pro- 
grammers. Here's a routine to 

simplify it: 

10 DIMLN(16) 

20 FOR X = 1 TO 16 

30 LN(X)=(X-1)*64 

40 NEXT X 

This little routine is written for 
Model I or III. It sets up array LN 
with elements 1 to 16 representing 
lines 1 to 16, It calculates the 
location number for the first 
location in each line. Using this, you 
can use line number (row) and 
column coordinates by adding the 
column number (zero to 63) to LN 
(linenumber) in your PRINT @ 
statement. For example, to print at 
line 3, column 10, use PRINT @ 
LN(3)+10. To change this for the 
Color Computer, change the 64 in 
line 30 to 32. For Models II and 16, 
change the 16 in lines 10 and 20 to 24 
and the 64 in line 30 to 80. 

It's a good idea to get in the habit 
of putting a trailing semicolon after 
every PRINT @ statement. Without 
one, the line following the line on 
which you're printing will be 
blanked out. If a PRINT @ 
statement without a trailing semi- 
colon is used on the bottom line, a 
linefeed causes the entire screen 
display to scroll. Printing in the last 
location, even with a trailing 
semicolon, scrolls the screen. 

Here's a routine to draw a box 
around the sen -en of a Model I or III. 
Add the following lines to the above 
routine: 

5 CLEAR 200 : CLS 
100 PRINTS LN(1), STRING$(64, 

131) 

110 FOR X=l TO 15 

120 PRINTS LN(X), CHR$(191); 



130 PRINT@ LN(X)+63, CH R$ 




140 NEXT X 

150 PRINT@ LN(16), STRING$ 

(63,131); nHk^RSm: 

200 GOTO 200 Hfc, W$. 

Note that nothing is printed in the 
last space on the bottom line. Line 
200 makes an endless loop to avoid a 
READY prompt. 

Learning to format screen output 
requires practice and study of print 
statements, especially the TAB 
function and the PRINT @ state- 
ment. But, the result in attractive, 
user-friendly programs is worth the 
effort. That's BASIC. 















Programming Tips 

1. The "?" is shorthand for 
PRINT. Using it saves key- 
strokes. 

2. Positive numbers print 
with leading and trailing 
spaces and negative numbers 
fill the leading space with a 
minus sign. | 

3. According to the manual, 
semicolons may be left out of 
PRINT statements "in cases 
where no ambiguity would re- 
sult." I've found that my 
computer and I have different 
ideas of what's ambiguous, so 
I always put them in. 

4. If you have a screen with 
fewer than 80 columns, you'll 
probably have to amend 
LPRINT statements to your 
linepr inter to accommodate its 
extra columns. 

5. A shifted @ in a PRINT ■ 
statement will generate a syn- 
tax error. (This is one of my 
most common errors. Al- | 
though I have adjusted to all 
the other differences from my 
typewriter keyboard, I just 
can't seem to type the @ 
without hitting the shift key.) 

6. The PRINT @ statement 
is for video display only. It 
can't be used with a printer. 

7. PRINT (§ is a very useful 
statement for formatting 
screen output. Bill Burden's 
excellent book, Business Pro- 
gra m m ing Appli c a t i o n s 
(Radio Shack, $4.95 ). shows 
many uses for it. 
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Tandy topics 



Model 4 questions and answers: 
Feedback directly from Ft. Worth 



Ed Juge, Director Computer Merchandising 
1500 One Tandy Center, Ft. Worth, TX 76102 



Well, it happened again! A Friday 
phone call from my editor said I 

slipped up and didn't get my column 

in on time. I guess I could blame 
some of it on travel to NCC, then 
CES, and we're still working on the 
catalogs I told you about last month. 
Then, to top it off, I spent the month 
of May as "guest host" on 
CompuServe's Software Author's 
SIG's QUERY section. Sysop 
Charlie Bowen assured me it 
wouldn't take over 15 or 20 minutes 
per day. Charlie, yer clock needs 
windin' ... it was more like 3 hours! 
But, it was lots of fun, and great 
feedback for our merchandising 
group. 

Since I'm late, and there were a lot 
of questions asked that you might 
find interesting, I - might just 
paraphrase some of those questions 
(and their answers) here for you. I 
promise not to use them all. 
Actually, it would take care of 
"Topics" for the next three years. 
And, up front, let me thank all the 
SASIG members who made it such a 
successful month. 

When will CP/M be ready? 

Current schedule (and yes, we're 
about five months behind our 
intended timetable) is the end of 
August for all versions. Since I'm 
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writing this in June, there's some 
speculation involved, so it's not a 
promise. 

It seems Tandy always introduces 
hardware without any software to 
go with it, e.g., as in Model 16, Model 
4 (Model 4 mode), etc. How come? 

There are two strategies in new 
computer introductions. One is to 
delay the introduction until you can 
spring it on the market with lots of 
software. The other is to put out the 
hardware as soon as it's solid, so 
software vendors (and users who 
intend to write their own) can get 
started early. The former approach 
prevents programmers from getting 
started. The latter seems to best 
serve both groups, since those who 
can't use it without software are 
surely free to wait to purchase until 
everything is ready. 

When will Tandy release technical 
information on the Model 100? 

A technical reference manual is 
being produced now. Target date for 
availability is the end of August. In 
the meantime, product manager Bill 
Walters made as much information 
as we had available on Compu- 
Serve's public access. Numerous 
others added information. Inciden- 
tally, there is a Model 100 SIG on 
CompuServe now, too. 



How can I use Model 4 's extra 64 K 
of memory from BASIC? 

You can use it from BASIC by 
using MEMDISK. MicroSoft does 
not offer a bank- switching BASIC 
language. The process is sticky 
enough to be a bear, even for 
professional programmers. You can 
do it with SVC's or USR routines. 
See the Model 4 technical reference 
manual for further information. We 
will sell a number of programs 
which will take advantage of the 
other 64K, and you can speed up lots 
of operations by using MEMDISK. 

But, some of my really memory- 
tight Model III programs won't 
convert and fit in Model 4 mode. 

Right. Your Model III programs 
will continue to run 100% (all those 
we tested did) in the Model III mode. 
TRSDOS 6,n (Model 4 mode) does 
take up more room, but it also 
includes COM and allows chaining 
of routines (with passing of 
variables) so you can actually create 
a much longer, or more involved, 
program than ever before. There will 
be some modifications required of 
long Model III programs if you insist 
on converting them. 

Will there be low-cost upgrades for 
Model III programs to Model 4; 
Scripsit, VisiCalc, Profile, etc. ? 



Yes and no. Yes on the two we 
own, Scripsit and SuperScripsit. It 
won't be free, but it will be lower cost, 
maybe half price (not yet determined 
at this time). No on those programs 
written by outside authors. They 
depend on these items for their 
income and there is a substantial 
effort involved in the conversions. 

/ seem to have trouble using 
MEMDISK in my 64K Model 4. 
Why? 

The manual states (page 119) that 
you can't use MEMDISK and 
BASIC at the same time in a 64K 
Model 4. The MEMDISK drivers 
compete with BASIC for space in the 
first 64K. 

Why doesn't Tandy put technical 
information and schematics into the 
owner's manual instead of in a sep- 
arate technical reference manual? 

The folks on SASIG (and readers 
of this magazine) are more 
technically advanced than the 
majority of our customers — much 
more advanced! We've found that 
the simpler we can make the docu- 
mentation that is supplied with the 
computer, the better off we, and 
they, are. The mere presence of all 
that technical data is enough to 
completely "turn off" an 
apprehensive novice. And 90% of our 
buyers don't need, or want, it. It's 
available separately for those who 
do. Unfortunately, it's usually a 
little later, due to the workload in the 
technical writing group. 

Have you ever considered that 
some people won't buy backup 
protected disks? 

Yep, no doubt. We protected one of 
our in-house programs. Others were, 
and will be, protected only at the 
insistence of the authors. I also like 
to have copies of most of my 
programs (sometimes at work and at 
home). It's my opinion that the 
author is entitled to the income on 
his work. If I wanted computers at 
home and at work, I'd have to buy 
two. Why should software be any 
different? Someway, someone is 
going to solve the protection 
problem in software in a way that it 
won't cost the user for more 
hardware, and where he or she can 
bury themself in backups that won't 
run on any other CPU. Then, 
software protection will absolutely 
be a fact of life. 

So, that's a sampling of the kind of 
questions I got. See you next month. 
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ever wished that 
you had a better program- 
ming language, PASCAL 80 may 
be the language you dream about. It is 
a compiled language, faster, more ac- 
curate and easier to modify than Basic. 
Yet it is so easy to use that you can 
forget the hassles and diskette spinning 
of other compiled languages, including 
other versions of Pascal. 

Now you can create your own com- 
mand files that execute from DOS 
without having to load a language into 
the computer first, but do it with far less 
work than machine language. You can| 
sell your compiled programs without any! 
royalty payments! 

Although designed for teaching and 
ideal for that purpose, PASCAL 80 also 
allows serious applications with a full 
fourteen digits of accuracy, even on log 
and trig functions! 

PASCAL 80 allows you to create files 
on the TRS-80® Model I, Model III, 
LNW-80, PMC-80, or LOBO MAX-80 
that will run on any of the other 
machines under TRS-DOS®, LDOS, 
NewDOS, NewDOS 80, DBL-DOS or 
DOS Plus 




PASCAL 80 is used in dozens of High 
Schools, Colleges, and Technical 
Schools, and has been favorably re- 
viewed in Byte, Creative Computing, 
and other magazines. 

You get all of this at a bargain price of 
only $99 plus $2 shipping. If you call and 
order by MasterCard or VISA, we will 
even credit you $1 for the phone call. 
Call or send your check today! 

^EW (CLASSICS S£LI^^? 

239 Fox Hill Road 

Denville, NJ 07834 

(201) 625-8838 

TRS-80® and TRS-DOS are trademarks of Radio Shack, 
LNW-80 of LNW Research, PMC-80 of Personal Micro 
Computers, LOBO, LDOS, and MAX-80 of Lobo Systems, 
DOS-Plus of Micro Systems Software, NewDOS and 
NewDOS 80 of Apparat, and DBL-DOS of Percom 
PASCAL 80 is a trademark of New Classics Software. 

NEW!! POINTER VARIABLES! 
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Now you can try Pascal 
without spending a fortune! The 
Pascal 80 Trial Version is a 
reduced version of Pascal 80, and 
does not include pointer variables 
or disk files, and does not allow 
you to save your programs. But it 
does let you program in Pascal, 
list your programs to a printer, 
and even comes with a coupon 
worth $10 off the regular price of 
Pascal 80. This version of Pascal 
comes on a diskette that will boot 
on a Model I or Model III 
TRS-80. 



•Here is what you get:- 



VARIABLE TYPES: real, in- 
teger, char, boolean, arrays, 
sets, records, and user de 
fined types. 

CONSTANTS: minint, pi, true, 
false, and user defined 
constants. 

OPERATORS: + - * / div mod 
comparison/set operators 
and or not. 

FUNCTIONS: abs sqr sqrt sin 
cos arctan exp In ord pred 
succ chr odd round trune. 

PROCEDURES: read readln 
write writeln 

STRUCTURES: if.. then.. else 
case for.. do while.. do 
repeat.. until goto 



Send $14.77 by check or money 
order to: 

Pascal 80 Trial Version 
New Classics Software 
239 Fox Hill Road 
Denville, NJ 07834 

Sorry, no credit card orders at 
this price! See our other ad for in- 
formation on our regular version 
of Pascal 80. 



EW CLASSICS 
SOFTWARE 
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Donald L. Sfoner, Mercer Island, WA 



Do you remember the first time you "lit off your 
Model I? I do. I recall thinking: "You may be READY, 
but I'm not!" Four years (or is it five) later, I'm an "old 
time Tandyite." I now "whip up" programs and boot 
disks with wild abandon. 

Even the old-timer experiences the same feelings 
when he or she decides to go "on-line" with a modem. 
The telecommunications equivalent of your first 
CLOAD might be, "Far out! I'm connected. What do I do 
now?" 

Let's take a "guided tour" through one of the nation's 
largest data bases and look at the sights from a 
newcomer's point of view. If your Radio Shack salesman 
was worth his salt, he probably sold you a membership 
to CompuServe Information Service (CIS) along with 
your modem. Even if he did not, it's a bargain and you 
should ask for it. 

CIS is one of the most user-friendly information 
utilities (data base) that exist. Even so, it can still be a 
mind blower for the newcomer to telecommunications. 
One reason for the "teleconfusion" is the enormity of 
information available. CompuServe is like an infinite 
number of caves (information), connected together by 
tunnels (menus). Each tunnel leads to more caves, and 
so on. Each week, more tunnels and caves are added. 
More often than not, the newcomer will explore 
tunnels and caves that are not really the ones he or she 
wants. After awhile, one begins to feel like Tom Sawyer 
and Becky Thatcher without a torch. 

CompuServe has all the information you could ever 
wish for, but they are not very good about telling you 
how to find it. For example, they recommend that you 
order a copy of their user guide. Just send a request 
through FEEDBACK. But, how the heck do you find 
FEEDBACK? The documentation which accompanies 
your membership assumes that you will "learn by 
doing." You certainly will, but it's expensive to explore 
CompuServe without some sort of cavemap. 

Hopefully, in this article, I can provide a few tips for 
getting around the labyrinth called CompuServe. I've 
learned (in two years or so) where the best caves and 
tunnels are located and how to teleport my TRS-80 from 
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one to another. 

The first problem the newcomer faces is the log-in 
process. There are a couple of different ways to enter 
CompuServe. They have individual entrances to their 
caves in each of the major cities. These are called nodes 
in their communications network. In the smaller cities, 
you may have to enter the cave (node) of another 
company to connect to CompuServe. These other 
companies are called packet networks, such as Telenet 
or Tymnet. These packet carriers are like long-distance 
digital networks that carry only computer information. 
CompuServe will charge you a couple of bucks extra for 
accessing them via one of these carriers since CIS is 
charged for the packet service. It still beats calling the 
nearest CompuServe node by long distance. 

Here in Seattle, my cave (or gateway) is direct into 
CompuServe. To contact them, I dial their number: 634- 
1713. I hear an answering tone, switch on my modem 
and presto . . . nothing! To kick them in their electronic 
fanny, I must send a control C. If I send anything else, 
the screen responds with indecipherable garbage. I have 
never figured out why. If it happens, I must hang up the 
phone and try again. Pity the poor newcomer who didn't 
bother to read the instructions carefully and sort this 
out. 

In a little city to the south (Tacoma), there is no 
CompuServe node. The folks in this dialing area must 
log in through a packet carrier called Tymnet. Doing so 
results in the same response as for CompuServe . . . noth- 
ing. This time, however, you must respond by hitting the 
A key to the question "terminal identified:" Don't say 
TRS-80 as some have done. Tymnet does not have a 
sense of humor. Having passed this hurdle, your screen 
should print the words USER ID. Answer with CIS02 for 
CompuServe user. You should now be connected. 

Helpful hint: When you are ready to buy your 
CompuServe membership, tell the Radio Shack 
salesman that the deal is contingent on showing you 
how to log in. Virtually every store has a computer and 
modem. The store manager is usually required to know 
the correct procedure. Take a tablet with you and copy 
down the steps that are required to connect with 
CompuServe. 
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Assuming that you have managed to log-in (either 
direct or through Tymnet), the next thing you will see is 
User ID: (follow along with me, using the accompanying 
listing). You are expected to type in the 70000-series 
number that was assigned to you when you obtained 
your membership. As you can see, my number is 
71625,1620. 

After a short pause, CompuServe will ask you for your 
password. As you type this in, don't be surprised that 
you do not see the characters echoed back to you. During 
the password entry, the echoplexer back in Ohio is 
turned off. This is so that someone looking over your 
shoulder cannot learn what your secret number is. 

Assuming that you enter the ID and password 
correctly, the next thing you see will depend on a number 
of factors. Following the time-date line, information 
may be sent to you regarding new services, revised 
phone numbers and so on. This is also the point where 
you will be advised if electronic mail is waiting for you. 
Usually, however, you will be transported into the first 
tunnel: the CompuServe main menu. This is Page CIS-1. 
Helpful hint: Note that each screen "page" has a page 
number. It is located in the upper right corner of your 
screen and usually consists of three alpha characters 
and one to three digits. When you find an interesting 
tunnel or cave, write down the page number. Later, you 
will be able to use these numbers to teleport yourself 
around the CompuServe labyrinth. 

The main tunnel (page CIS-1) presently has six 
selections. Each of these leads to more tunnels and caves 
and they are grouped into general areas of interest. 
Home services has things like banking, gardening and 
so on. I've not found too much of interest here that I 
could not have for the price of a newspaper or magazine. 
The business and financial section has some interesting 
information to those who are into stocks, bonds and the 
like. I'm more concerned about next month's house 
payment. My favorite is personal computing, and we'll 
travel to these caves in a moment. Services for profes- 
sions is for various groups like doctors, lawyers, pilots 
and so on. Again, not too much of interest for me. 

Helpful hint: Before you start exploring, turn on your 
printer and go to selection 5, called User Information. 
This is shown in listing as page CIS-4. Select item 2 
(Command Summary and Usage Tips). Print out this 
section completely for later study. Note that you can 
send electronic mail to CompuServe via the program 
called FEEDBACK (so there's where it is!). You can also 
order user guides, manuals and videotex software via 
menu selection 3. While you have the printer fired up, go 
to selection 4 and simply hit enter for each of the 
selections. The enter default will leave your terminal 
parameters unchanged, but you will have a printout of 
all those items which can be revised. You can look at the 
other items later on, if they are of interest. 

This time, rather than making a numeric selection, 
press the M key. This will take you back to the previous 
menu, which is the main (or TOP) menu. Before you dis- 
connect your printer, select number 6 on the main menu 
and print out theindex of page numbers. This may prove 
to be your most valuable listing later on. After the listing 
is done, again type M for the main menu. 




ADD THE BI-TECH 

BAR CODE READER 
TO YOUR 
EPSON HX-20 

OR YOUR 
RADIO SHACK 
MODEL lOO 

BAR CODE READER INCLUDES 
DEMONSTRATION AND 
SAMPLE ROUTINE. 





DISK UPGRADE 

Put Disk Drives into your TRS-80 MOD III or MODEL 4. 
•> Easy to install with Photo Instruction Manual. 
• Featuring the Holmes Disk Controller lassembled & tested] available 

with Hardware Real Time Clock and Battery built in Software Clock 

routines and TDOS Operating System included 

• 40 80 Single/Double Density Support 

• Dual Sided and 8" Drive Support 

. Drives are optional M0DEL '» M ° D Q EL Rn 4 

1203103) without clock $269 50 5269.50 

(203104) with clock $32950 $329.50 

(200111) 40 SH Disk Drives $200.00ea $200.00ea 

1213002) 32K Memory $34.95 

(204064) 64K Memory — * 11995 

Complete Kit with 2 Drives & Memory & TDOS $699.00 $799.00 

(2041281 64K to 128K Memory Upgrade $14595 



Bi Tech Hard Drives 
now available 
with 5 Meg 
Removable Cartridge 




BI- Enterprises Depi. 8-h^ lnqvwei Welcome 

10D Corbugh RoGd p nC es subject to change 

Bohemia, N Y- 1 1 7 1 6 ny s rodents odd tax 

B T Enterprises is o division of Di lech Enterprises Inc 
Orde'S Only Amencon fxpress Cone Olonche 

fiOQ-645-1 165 Dmers Cub MasterCard £> Visa 

NY- call (516) 567-6155 (516) 588-5606 (mqdem) 
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Build your own and save many $$$ 

The HIGH DESERT ENGINEERING EPROM PROGRAMMER 
provides the user with more features than most programmers costing 
many times more. It will program most popular 5-volt eproms, including 
the 2508, 2516, 2758, 2716 and 2732. The programmer allows the user to 
program an eprom from any ram memory, read an eprom into any ram 
memory and verify a previously programmed eprom. It will do automatic 
error checking and field checking to help prevent user errors. It will also 
automatically flag any previously programmed eprom locations. 

The programmer is compatible with TRS-80* MOD I & III and is 
supplied with a bare board, complete assembly instructions, software 
driver and users manual Write for complete details When ordering 
specify MOD I or III and tape or disk. (MOD I requires a bus adaptor 
Instructions included.) Software is supplied on tape and will transfer to 
disk. 

Software, instructions and bare board $39 50 

Assembled and tested for MOD III $174 50 

Assembled and tested for MOD I $194 50 



DEBUG - MONITOR 

This new disk based DEBUG/MONITOR from HIGH DESERT 
ENGINEERING provides many very powerful features for the serious 
machine language programmer It allows the user to set up to 10 
breakpoints along with the capability of setting multiple pass or loop 
counters for each breakpoint Several display modes can be set for each 
breakpoint as well as the ability to selectively dump memory/registers to 
the printer at each breakpoint. Code is disassembled so the user can see 
the instructions executed during single step mode The disassembler 
output can also be routed to the printer DOS commands can be executed 
without losing debug control. This debug utility has many memory 
compare, search and modify features plus much, much more Write for 
complete details on this very powerful debug/monitor utility 

Specify TRS-80 MOD I or MOD III and memory size $29 50 

*TRS-80 is a trademark of Tandy Corporation 

HIGH DESERT ENGINEERING 

1630 So. Downs St. 

Ridgecrest, California 93555 
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Next, select number 3, personal computing. This 
tunnel will be page PCS-1 (see listing). The 
communications selection takes you into the caves for 
electronic mail and the public bulletin board. The 
programmer's area is for the pro's because there are no 
menus to guide you. We'll duck into this cave later on. 
To see why your $20 CompuServe membership is a 
bargain, press number 5 to get to the menu for clubs and 
groups (page PCS-50). This page is a partial listing of the 
special-interest groups (SIGS) that reside on 
CompuServe. The granddaddy of all groups (the one 
which started them all), is called MNET-80 and is run by 
Richard Taylor (selection 9). The operator of a SIG is 
called the SYSOP (system operator). Richard is a former 
opera singer who gave up his career for computers when 
the TRS-80 Model I was introduced. Today, in addition 
to his activities on CompuServe, Richard is the 
president of Programs Unlimited, a franchise hard- 
ware/software house that is sweeping the country. 

The other SIGS of interest to TRS-80 users are number 
7 (for the Color Computer), 10 (for users of LDOS), and 1 1 
which is run by QSD Software. 

Helpful hint: Before we visit Richard Taylor's SIG, let 
me show you a couple of tricks for teleporting around 
CompuServe. Rather than pressing 9, type the letter T. 
Presto! You are back to the top menu and you got there 
without wading back through the previous menus. It 
works in the other direction too. Rather than go all the 
way forward through the menus you have already seen, 
type GO PCS-50 rather than a menu selection. If all goes 
well, you should see "Request Recorded, One Moment, 
Please." You can use the GO command from any of the 
menus so long as you know what page to which you 



Model II Dsrecf Screen 
Input/Output With 
Full Editing, $49,95 




For Free Brochure: 

The Proper Touch 

P.O. Box 13760, 202 
Houston, Texas 77219 
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tc 

User ID! 71<S25»1620 

Passwordi 

CoapuGerve Information Service 

22 5 3? PDT Monday 23--May-83 

CompuServe Page CIS-1 

CompuServe Information Service 

1 Home Services 

2 Business & Financial 

3 Personal Computing 

4 Services for Professionals 

5 User Information 

6 Index 

Enter your selection number? 
or H for more information, 5 

CompuServe Page CIS-4 

USER INFORMATION 

1 What's New 

2 Command Summary L Us3ge Tips 

3 FEEDBACK » Manuals* Products 

4 Changing Terminal Defaults 

5 Chsnsing Your Password 

6 Reviewing Your Charges 

7 Changing Credit Card Info 
Teler-hone Access Numbers 
? Current Rates 

10 CompuServe Viewpoint 

11 Electronic Bounce Back 

Last menu page. Key digit 
or M for previous menu. 

CompuServe Page PCS-1 

PERSONAL COMPUTING SERVICES 

1 News 

2 Reference 

3 Communications 
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want to teleport. 

At this point, you should be in MNET-80 as a visitor. 
This SIG has a $20 membership charge. As a non- 
member, you cannot make your parameters (see below) 
permanent. You can still read the messages, but you 
cannot leave a message (other than a membership 
request), nor will you have access to the enormous data 
base of TRS-80 programs and utilities. Many of the 
important people in the business of selling and 
supporting the TRS-80 are members of MNET-80. This 
includes Bob Snapp (Snappware) and Lance Micklus (of 
ST80 fame), to drop a couple of names. Several 
executives at Tandy are members. Ed Juge and Bill 
Walters faithfully answer messages directed to them. 
What other major computer company provides this type 
of support? 

New users of any SIG are first exposed to a simplified 
menu. Since I am already a member of MNET-80, 1 have 
taken the editorial liberty of splicing a newcomer's 
menu to the MNET-80 check-in. This will save listing 
space in the magazine. You will not see the "Do you wish 
. . . Inserting name and ID:" on MNET-80 unless you 
have sent in your $20 membership fee. However, the 
newcomer's menu is representative of the other SIG's, 
which do not have a membership charge. 

You can live with the simplified menu, but I 
recommend that you enter OP (or number 9) to change 
your SIG options. When you see the option menu, enter 1 
to change to command mode. Then, when you see the 
User Option prompt, enter LL to change your line length 
to 64 to match your Model I/III (32 for the Color 
Computer, or 80 for the Model II, 4, 12 and 16). Finally, 
enter BR for Brief mode, P to make these options 
permanent and T to go back to the top menu of the SIG. 
Helpful hint: This brings me to a "beef that seems to 
bug both newcomers and experienced users of 
CompuServe. To return to a main section from some 
menus, you are expected to type EXI for exit. From other 
menus, the service wants T for top. Be careful that you 
use the correct return character(s) and only the required 
number. For example, if you are returning to the main 
section from the SIG option menu discussed above, you 
must press T. However, if you accidentally hit T twice, 
here's what happens. The first T takes you back to the 
top of the SIG menu like it is supposed to. However, the 
second T you entered will be held in a buffer at 
CompuServe and take you back to the top menu (Page 
CIS-1) even though you did not want to exit the SIG. 

I've run off a couple of messages to show what you can 
expect to see. At the function prompt, I entered RS 
(retrieve selective). The SIG responds with Search Field 
and I entered S for subject. The string I searched for is 
100. Thus, only messages relative to TRS-80 Model 100 
are printed. I've only shown a couple of responses which 
were among the dozens that had been posted since 
message 39200. The message from Clay Schneider was 
entered at 5:45 p.m. It was answered at 8:45 the same day 
by Jesse Bob Overholt. Note the (X) on the To: line of 
message 39237. It indicates that Clay read the reply. 
How would you like to have your TRS-80 questions 
answered this fast? 

Note that at the (C)ontinue, (RE)ply, (T)op prompt, I 
typed GO PCS-71. I could have entered GO PCS-126. 



SPECIAL OFFER 

Model I or Model II 

9 Programs Worth 

$330 00 




$ 2 50 Handling Reg 

Price 

Personal Financing 14 95 

Dome Bookkeeping 29 95 

APL-80 39*5 

Pascal-80 99 95 

9 Games for Preschoolers 14 95 

Tiny Comp (Basic Compiler) 24 95 

Inventory 59 95 

Floppy Disk Diagnostic 24 95 

Typing Tutor 1 9 95 

$ 330 00 
Sold as a package only for 79 95 (disk only) 




(MasterCard) 
^ — -X. — s 



Box S-8 Gulf Road 
Greenfield, N.H. 03047 

1-603-547-3553 

Offer Expires July 31, 1983 
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» Supports over 50 different popular printers includ- 
ing OKIDATA Microline 80, 82A, 83A, 84A, Oume, 
Centronics 737. 739, Radio Shack Line Printer IV, 
VI. Daisy Wheel II, EPSON MX-80, MX-100, Graftrax, 
Graftrax Plus. Gemini-10, Gemini-15, NEC PC- 
8023A-C, Spinwriter 5510, 5515. 5520, 5525, C. Itoh 
Prowriter 8510, Starwriter FP-1500, F-10. Tec 8500R, 
Smith-Corona TP-1, Brother HR-1, COMREX Com- 
Riter CR-1, IDS Microprism 480. and Diablo 630 

' Supports proportional space right-margin justifying 
on Centronics 737, 739, Radio Shack Line Printer IV, 
Daisy Wheel II. Graftrax Plus, NEC PC-8023A-C, 
Spinwriter 5510, 5515, 5520, 5525, C Itoh Prowriter 
8510, Starwriter FP-1500, F-10, and Diablo 630 

< Powerful Mailing List and Mail-Merge capabilities 
for personalizing standard legal documents and 
Form Letters, handling infinite number of data 
records per run, infinite number of data fields per 
data record, and data fields as large as up to 1000 
characters each 

Brand new feature called "ZAP-PROCESSING", 
allows you to display and edit any type of data or 
program file in "ZAP" (byte-hexidecimal) format 
Any character or symbol your printer can print, even 
dot graphics, can be used in mid-line printing with 
the Special Character feature 
Written in fast Z80 machine language with type- 
ahead key-stroke buffering for speed typing 
Single key-stroke control of all editing functions 



fori 



soft 



Continuous on-screen display of word c 
count, and free memory count 



unt, 



• Superscripts, subscripts, underlined, bolded, ex- 
panded and condensed type styles - combine and 
intermix within a line 

a Automatically justifies and word-wraps on the screen 
as you type 

• Search, Replace, and Global Search and Replace 
6 Odd and even page user-definable headers, footers. 

and page number lines, with automatic page 
numbering 
» User-definable linespacing, sheet size, top. bottom, 
left, and right margins 

• Move blocks of text and copy blocks of text from 
disk, to disk, and within the text 

> Examine disk directory on any disk and kill files 
while editing 

' Powerful full-screen editing features for EDTASM 
and BASIC files, including automatic renumbering, 
of lines 

» Buiit in function to dump contents of screen to 
printer 

> Print-previewing formats text, inserts headers, 
automatically numbers pages, etc on the screen 
without printing it on paper 

' Page by page pausing capability tor sheet fed 
printers 

Supports both parallel and serial printers 
Printer control code access. 

Works with NEWDOS, NEWDOS80, TRSDOS 
MULTIDOS, LDOS, and DOSPLUS - Single or 
Double Density 

Compatible with most all available spelling checker 
programs 



GUARANTEE 



Many word processing systems claim theirs are the best, but few would dare guarantee them 
Not us! We are confident that ZORLOF is the most useful word processing system on the market 
for under $200 If you don't agree, return it within 30 days for a full refund 
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4 Shop at Home 

5 Groups 3nd Clubs 

6 Programmer' s Ares 

l_3st menu ps3e . Key digit 
or H for previous menu. 5 

CompuServe PaSe PC5--50 

Personal Computing S1GS 

1 CP/M SIG 11 ST-80 Users 

2 HUG (Heath) 12 Programmer's 

3 MAUG (Apple) 13 CEM SIG 

4 MNET-iHHll ) 14 Author Forum 

5 MUSUS p~sys. IS Commodore 

6 RCA micros 16 Atari SIG 

7 TRS80 COCO 17 IBM PC SIG 

8 Panasonic 18 0SI SIG 

9 MNET80 TRS80 19 Instructions 
10 LDOS TRS80 20 Descriptions 
Input a number or k®« 

<ENTER> for more choices 9 



CompuServe 
Reauest Recorded* 
One Momentr Please 
Thank You for Waiting 



Page PCS-54 



ANITEK SOFTWARE PRODUCTS D P.O. BOX 1136 D MELBOURNE, FL. 32935 D (305)259-9397 



Your name; Don Stoner 

Do you wish to be added to the 

member list at this time? Y 

Inserting name 3nd ID 5 
please stand by... 

Welcome to MNET80* V. 1A( 52 > 

Name; Don Stoner 71625*1620 
Last onJ 23-May-83 22J09J53 
High msg#: 39270 




Well, not quite, but with the 

H#)CMAi disk managemer 

system it feels like your whol 

disk library is on one big disl 



Here's how it works. Under the Hexman 
system, a set of "Filestore" disks reside 
permanently in your disk drives. These disks 
contain your most active files. Any files that 
you wish to use, or create or change are kept 
on these Filestore diskettes. Files that you 
are not currently using are kept in a"Library" 
of disks beside your computer Hexman 
maintains a catalog of all your files, and 
which disks they are on. When you need a file 
that is not currently in the Filestore, give 
Hexman its name Hexman will instruct you 
to insert the appropriate Library disk and 
transfer the file into the Filestore Library 
disks are identified by numbered color-coded 
labels which we provide 

If you had to mount Library disks every 
time you needed some files, Hexman would 
be no better than the old way of doing things 
But here comes the clever part. Hexman 
knows which files are in the Filestore, so it 
only loads files if they are not currently avail- 
able in the Filestore. It counts how frequently 
you use each file, and ensures that the files 
in the Filestore are the ones that are used 
most frequently. If the Filestore disks are 
getting too full, Hexman removes the least 
frequently used files Because the most 
active files are kept in the Filestore, the 
chances are that any file you need will be 
ready and waiting Only when you request a 



rarely used file does Hexman need to move it 
in from the Library Thus as Hexman 
becomes familiar with your pattern of file 
usage, transfers from the Library drop to a 
minimum 

Each morning, when you first use Hexman, 
it scans your Filestore, notes any changes 
and takes action Any new files are auto- 
matically cataloged New and updated files 
are backed up to the Library Hexman makes 
this easy to do by sorting the files into 
Library disk sequence, then prompting you to 
insert the appropriate Library disks one after 
the other This Filestore scan and backup 
process ensures that your disk Library files 
match the active files in your Filestore Thus 
you can safely treat the few Filestore disks in 
your drives as if they contained your whole 
disk Library 

Besides the basic Storage Management 
Module described above, additional modules 
are available for those that need the extra 
power The Security module creates two 
additional copies of any vital files, and allows 
off-site storage of one of those copies The 
KeySearch module allows the cataloging 
and retrieval of files by keywords (also called 
headings or categories) This module allows 
fast retrieval of files even when you can't 
remember their names Other extension 
modules for the Hexman system are planned 



Requirements. 

TRS-80 Model III— 48K, 2 drives. 

Model I.— 48K, 2 drives 

Double Density adapter 

Lower case modification. 
Operating Systems 

LDOS 5.1 Newdos 80 Vers 2 

DOSPLUS 3.5 (Available shortly) 

Ai^HeXAOON 

WSYSTBMS 



hsxmanD.M.S. Vers 2 US$79.95 

(Storage Management Module) 

Security Module $39.95 mmmm 2M& 

KeySearch Module $49.95 L^UmKI 

Trademarks 

TRS-80 -Tandy Corp pooler 

LDOS -Logical Systems Inc inquiries 

Newdos 80 -Apparallnc welcomed 

P.0 Box 397. Station A 
Vancouver, B.C. Canada V6C 2N2 
Telephone (604) 682-7646 
Electronic Mail Micronet 70235 1376 
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You are user number 127070 
System contains messages 
38938 to 39282 

Function menu t 

1 (L) Leave a message 

2 (R) Read messages 

3 ( RN ) Read new messages 

5 (B) Read bulletins 

6 (CO) Online conference 

9 (OP) Change your SIG options 
0(E) Exit from this SIG 

Enter selection or H for help! OP 
User Options menu* 

1 Change to coBmand mode 

2 ( LL ) Change line length 

3 (T) Return to Function menu 
<p) Hake options permanent 
Enter selection or H for help* 1 

User option I LL 

New line length* 64 
T - return to Function level 
ST - stop between messages ( & > 
NS - don't stop between messages 
LL - change line length (64 
BR - set brief mode > which suppresses 

repetitious display of options 
NB - clear brief tsode (*) 
CN - change name 

DS - set default login Section (0) 
P - aaKe options permanent 

MEN - use menus instead of command prompts 

User option? BR 
User option; P 
User option J T 

Function! RS 

Search field; S 

Search string; 100 

System contains messages 

38938 to 39282 

Starting message nueber 

(N implies since last time on); 



39200 
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This would have taken me directly to the Color 
Computer SIG. You can explore this group, if you are 
interested in the Color Computer. There is no 
membership charge. If you are interested in any of the 
other SIGS, you should have their page numbers if you 
printed the index as suggested earlier. By the way, those 
of you who have Orchestra 80/85/90 capabilities will be 
interested in a well-hidden data base with a lot of music 
software. Simply type GO HOM-13 at any of the menu 
prompts for the data base or GO ORG for the Orchestra 
90 archives. 

If you are a ham radio operator, you must check out 
another hidden cave called HAMNET. It's not listed on 
the menus, but can be entered by typing GO HOM 11. 
The SYSOP is Scott Loftiness, W3VS. The latest ham 
technologies are discussed and many prominent radio 
amateurs check into this database. 

Now that you have a rough idea of how the tunnels 
and caves are connected, let's make a foray into the very 
heart of CompuServe. Let's actually do some 
programming on their DEC computers. I've forgotten 
where I left you, but from one of the menu prompts, type 
GO PCS-71. This will take you to the same place in the 
system as if you had made selection 6 (Programmer's 
Area) on page PCS-1. If you make the transition success- 
fully, your screen should print OK. This is the prompt for 
the programmer's area. Type DIR (for directory). Since 
you have no stored files at this point, you will get a 
message to this effect. However, you have 120K bytes of 
storage available, so let's use some of it. 

Type FILGE TEST. This is the file generator program 
and you are going to create a file called TEST. After the 
message telling you the file has been created, whatever 
you type will go in this file until you close it. Type "The 
Quick Brown Fox" and/or "Now is the time," etc. In 
fact, type anything you like. By the way, don't type more 
than 80 characters or so before hitting the enter key. 
When you tire of the game, hit enter, then type /EX (for 
exit). The OK prompt will return. Now, type DIR. Holy 
smokes, there's a file named TEST that is 3200 bytes 
long, created on such and such a date with a protection 
code of (4). Note that CompuServe saves the files in 3200 
-byte blocks. No matter how much text you entered (up to 
3.2K), you will consume 3.2K of your allocated space. 

At the time this article was written, I had four files in 
my directory. This is electronic mail that I have saved in 
my filespace, awaiting time for me to reply. 

By the way, if you wanted to upload a file to 
CompuServe, the procedure would have been the same. 
Type FILGE and a filename. Then start transmitting 
your file. The echoes you receive from CompuServe will 
make you think they are getting garbage, but keep 
sending. After the file has been transmitted, type /EX to 
close, as before. 

To look at your file, type TYP TEST and you will see 
the characters exactly as you entered or uploaded them 
earlier. If you want to scrub the file, type DELETE 
TEST. You should practice using the file generator 
(FILGE). However, for correcting errors and deleting or 
inserting text, you will need CompuServe's guide. 
FILGE is probably unlike any text editor you have ever 
used. All commands are preceded by a slant bar (/). 
However, you will need to get familiar with FILGE as 
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3 NEW utility programs that will be HELPful to you. 

RESTORE/CMD (NEWDOS-80* Mod. /Ill only) "Bring'em 
back alive" with this DOS command utility. If you have just 
"killed" your favorite program by accident and now want it 
back... it's as simple as typing RESTORE:XXX:0 $16.50 

CAT/CMD (Mod/Ill only) Put this "CAT" on your disks and 
read those TRSDOS directories while using NEWDOS or 
LDOS or ???? or vice-versa. CAT is a DOS-INDEPENDENT 
program that will display the disk name, date, type of DOS 
and the directory. This can be a very HELPful addition to 
your utility library $16.50 

BANNER/CMD (NEWDOS-80 Mod/Ill only) Change that 
standard introductory DOS banner into something YOU want 
to see. BANNER will write to disk the code for up to 13 
characters that you specify. Now each time you boot up a 
new disk, you can easily verify what you have or want 
to see $16.50 



ASK FOR al 

disk for 



THREE of these 



programs on one 
$39.95 



MAYDAY software carries many new "major name" programs 
including one of the largest selections of utilities available 
from one source. For your WORDPROCESSING, DATA 
MANAGEMENT, SCREEN GRAPHICS, PRINTER ENHANCE- 
MENTS, GAMES and HARDWARE needs, MAYDAY is ready 
to be of HELP to YOU. Call or write for your NEW 
CATALOG today 




* Apparat, Inc. 



SOFTWARE 



P.O. Box 66 • Rock Creek Road 

Phillips, Wisconsin 54555 

(715) 339-3966 

VISA/M-C WELCOME 

Personal checks require additional 14 days 

All prices include shipping 
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INCORPORATED 

OFFERS REMARKABLE SAVINGS 
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NEWSCRIPT-A high quality Word Processing System for the 
TRS-80" Models I & III, based on editing and text formatting 
programs developed by IBM for use on "mainframe" Time- 
Sharing Systems. 

Newscripf 7.0 $119.95 

Mailing Labels Option ' $ 29 95 

Newscript Plus Mailing Labels Option (Special) .$139^95 

DOSPLUS-Replaces TRSDOS'" with the most powerful and 
sophisticated operating system you can get for the TRS-80" 
Model I & III, including the new Model II version. 
New Dosplus 3.5 Version $129.95 

THE MICRO CLINIC-Computer diagnostic program for 
testing memory and disk operation. 
TRS-80* Model I & III 
Floppy Disk Diagnostic $24.95 



FILTERSOFT- 



Surge Protector beautifully crafted in bronzetone finish to 
protect and enhance your computer system. Concealed 
wall mounting brackets, 6 socket, on/off switch with lighted 
display, and mini circuit breaker with reset burton .$54.95 

All orders must be cash or UPS, C.O.D. Personal checks take 
3 weeks to clear. 





TRS-80' is a trademark of Tandy Corporation 
451 Sagamore Pky.«>W Lafayette, IN 47906® (317) 463-3433 




Y BUY A JOY STICK TWICE?! 

\T~ttyouhave an ATARI COMPATIBLE 

I f JOY STICK, you can use it on your 

\ TRS 80 with our kit! 

0Y STICK KIT* 



Without Joy Stick Model l/l 
With Joy Stick Model l/lll . 




$15.95 

$26.95 

— Be Your Own SYSOP !!!!- 

Bullet-80 Bulletin Board Model l/lll 
Version 8.0 $150.00 

I Offered only to 80 U.S. magazine readers . . . 
15% Off all game software including . . . 
CORNSOFT GROUP • SOFT SECTION MARKETING 
®BIG FIVE • ADVENTURES INTERNATIONAL and 
others from most of the major software houses. 

SALE INCLUDES COLOR COMPUTER SOFTWARE. Mention this 
ad with order. Items shipped from stock. Prices DO NOT 
include shipping and handling. Offer expires 8/31/83. 



Please call for information about ANY products. We have in stock a 
FULL LINE of Software from ALL Major Houses 

After-Market Computer Gallery 49 
P.O. Box 893 (Mail Order) 
1 Franklin St. (Retail Outlet) 
Danbury, CT 08810 

Vole© Lin© - 203 743-1299 

Bullet-80 Computer Line- 203 744-4644 (300/1200 Baud) 

"Internal Installation Required No trace cutting or electronics Involved 
**A Division of Computer Services of Danbury 





*t 39212 Sec. 4 - Model 100 
SbJ #Mod 100 Question 

22-May-83 17 ? 45 1 08 
Fat Clay Schneider 70240*212 
Tot All 

In looking through the ROM* I noticed 
the following 3 prosfts (?) 
Top?* End;* and Exet (if I remember 
correctly). Can someone tell me who or 
what these belong to? Th3nks» Clay 

* Reply; 

39237 
( C RE T ) t RR 

#: 39237 Sec. 4 - Model 100 
SbS #39212~#Mod 100 Question 

22~May-83 20t54t22 
Fm? Jesse Bob Overholt 70130>101 
Tot Clay Schneider 70240*212 (X) 

Clay, The Top*End*Exe labels are 
displayed by BASIC when a .CO file is 
LOADed from the direct (i.e. not in a 
program) mode. They refer to the start* 
end* and execution addresses of the 
machine language prograo. 

* Reply; 

39270 

* RR 39212 + 

(C RE T>: GO PCS-71 
Exiting at 23-May~83 22t45?03 
Last message on system; 39282 
High message retrieved; 39270 
Thank you for visiting MNET80 
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Reouest Recorded* 
One Moment* Please 
Thank You for Waiting 



Page PCS-71 



OK 

dir 

DAD 

SCOTT 

REPLY.TXT 

TERRY 

Total chars 



3200 
3200 
3200 
3200 

12800 in 



21-Ka«-83 (4) 

19-May»83 (4) 

Ol-May-83 (4) 

Ol-May-83 (4) 

4 files 



OK 

R ACCESS 

Access 

Public File Access Systen 

Ose ? for help 

Access; CATC70130* 1013 
Access 



70130*101 
DISASM.100 
DISDOC.100 
L1BD0C.100 
NOTES. 100 
OPCODE. 100 
RFU.100 
SUBLDR.100 



29-Apr-83 1695 Accesses; 58 

29-APP-83 2580 Accesses? 56 

21-May-83 3860 Accesses? 22 

06~May-83 785 Accesses? 86 

29-A»*r-83 2160 Accesses? 54 
22-Mb«-83 7605 

21-May-83 2915 Accesses? 22 



23-May 
23-May 
23-May 
23-May 
23-May 

23-May 
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V3lid commands? 

CAT - catalog 

COP - copy to disk 

TYP - type a file 

DOW - download 3 file 

KEY - search keyword list 

SUB - submit 3 file 

DEL - delete a file 

EXI - exit from ACCESS 

HEL - explains ACCESS 

Access! EXI 

Thank you for using ACCESS! 

OK 

OFF 

Off at 23;29 PDT 23-May-83 

Connect time = 0526 



Com 80 

this is the principal method of creating the text for 
electronic mail and public access, bulletin boards, etc. 
Helpful hint: If at any time you seem to get stuck 
inside one of the CompuServe disks, simply type control 
C. You will abandon whatever you were doing, but it 
should return you to the OK prompt. If you want to get 
back to the main menu (page CIS-1), simply type R 
DISPLA from the programmer's area. 

Okay, ready for the good stuff? Want to see where all 
the programs are stored? Better check the credit limit on 
your MasterCharge, 'cause you could run up a bill with 
this one! Type R ACCESS. At this point, I suggest you 
fire up the printer again and hit the question mark for 
help. Print out the commands and syntax required for 
the public access program. 

For starters, when you see the Access: prompt, type 
CAT right square bracket, 70130,101 left square bracket 
and enter just as I have done on the sample printout. 
This will take you to the catalog of programs stored by 
Jesse Bob Overholt, one of the many genius 
programmers who can be found on CompuServe. The 
listing shows his programs for the TRS-80, Model 100, 
stored as of 23 May, about the time this was written. 

If you would like to download one of these programs, 
type TYP NOTES. 100 (for example), then Jesse Bob's 
identification number inside of the square brackets. 
Before you hit the enter key, open your smart terminal 
program buffer. As soon as you hit the enter key, the 
program will come tumbling across your screen. As soon 
as you see the Access: prompt or "Press enter for next 
page," close your terminal program buffer and save it on 
a disk. You will need Scripsit to edit out the garbage at 
the beginning and end of the downloaded material. 

If you would like to search for other programs, type 
CAT/KEY: followed by suitable key words like TRS-80, 
COCO, MC10, or Model II. You might turn on your 
printer because there will be dozens (in some cases 
hundreds, as with a keyword like TRS-80) of program 
titles. The downloading procedure for any of these 
programs is the same, although some may need ASCII 
to binary (machine language) conversion. 

By the way, the DOW selection for downloading 
assumes you have one of CompuServe's downloader 
programs or a terminal program with automatic buffer 
open (control R) and close (control T). If you do not, use 
the TYP command. 

When you cannot afford any more downloading, you 
can exit the public access program by typing ESI. This 
will take you back to the OK prompt. From this point, or 
virtually any other point in the CompuServe tunnels 
and caves, you can type the word OFF and be 
disconnected. If you still have a few bucks to spend, you 
may wish to type R CB. This will take you to the inter- 
communications program between you and other users 
of CompuServe. I've found it is usually a bunch of 
chaotic nonsense (much like the real CB service), but you 
may enjoy being able to keyboard with someone clear 
across the country, in Canada, and occasionally from 
Europe. 

I've got to type OFF now, before the editor pulls my 
plug on what started out as a relatively short column. 
Until next month, have fun with your modem and new 
CompuServe membership. 




Nationally Acclaimed Programs for the 
TRS-80 Computers 

Now from the authors of SUPER UTILITY* a 
complete line of software to increase sales and 
return excellent profits. 

While SUPER UTILSTY+ won recent honors as 
Utility Program of the year by the 200,000 readers 
of 80 Micro, the quality and consistency carries 
through the complete Powersoft line. 

Professionally written and completely docu- 
mented, Powersoft programs are accepted as 
industry standards among TRS-8C erthusiasts. 



PowerMAII- 

PowsrDRAW 

PowerDOT 

PnwerORIVER 

Pow«rTERM 

INSIDE SU+ 

SU + TECH MAMUAL 



SUPER UTILITY PLUS 

SCRIPLUS 

THE TOOLBOX FOR LDOS 

THE MASTER MECHANIC SET FOR LDOS 

THE BASIC/S COMPILER SYSTEM 

MAKE/80 

SUPERMOVE 

DOSPLUS II 

CASH IN WITH POWERSOFT - THE WORLD'S 
MOST POWERFUL SOFTWARE VENDOR. WE 
OFFER EXCELLENT MARGINS, NATIONAL 
ADVERTISING, AND COMPLETE SUPPORT. 

SEND FOR OUR COMPLETE DEALER SALES KIT TODAY 



PRODUCTS FROM 8REEZE/QSD, INC 



1 1 500 Stemmons Fwy. 

Suite 125 

Dallas, Texas 75229 

,214) 484-2976 



WORD 

PROCESSING 
ON YOUR 
TRS-BO 
BECOMES 
CHILD'S PLAY 

USING SCRIPSIT 

"i by 

William James Haga 

mf/M/Km USING SCRIPSIT 

i is a complete and 
easy-to-use guide to 
SCRIPSIT— one of the most powerful word processing 
packages available for the TRS-80 Model I or III. 
USING SCRIPSIT is for the first-time user and the 
expert, presenting procedures at every level of difficulty 
in simple-to-follow steps and exercises. 
$21.95 

Look for these WEPCO products at your 
local computer dealer or bookstore. 
For more information or to order 
direct, call 415-595-2350 
and ask for Wendy Moore 
(MasterCard and Visa 
orders only). 



i registered trademark of Ihe Tandy Corporation 
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In the introduction to the 360-page 
preliminary MAX-80 operation 
manual, Lobo Systems describes 
their MAX-80 as follows, "The MAX- 
80 small business computer has ex- 
ceptional expansion capabilities." 
This is the best understatement I 
have ever seen in an operation 
manual. Incorporated in a housing 
about three inches deeper and 
perhaps an inch higher than a TRS- 
80 Model I keyboard, Lobo has 
managed to fit in controllers for both 
five- and eight-inch drives, two 
serial ports, a parallel printer port, 
hard disk port, expansion bus and a 
video port. In addition to all of the 
expandability, the unit also has a 
real time clock, speaker and up to 
128 kilobytes of random access 
memory (RAM). 

For this evaluation, Lobo supplied 
the following items: 

Item Price 

MAX-80 with 128K RAM 

and CP/M $ 945.00 

LDOS operating system . . $ 69.00 

Dual 8-inch drives $1185.00 

Dual 5y 4 -inch drives $ 690.00 

Amdek video 

monitor (green) $ 175.00 

(Amber monitor price $195) 

Total list price $3064.00 

This configuration probably in- 
cludes more drives than most buyers 
would choose, but it did allow for 
evaluating both operating systems 
on both size drives. 
. Two operating systems are 
available for the MAX-80. A disk 
operating system is necessary with 
the MAX-80, as it is a totally RAM- 
based computer except for the boot 
ROM. For TRSDOS compatibility, 
LDOS 5.1.3 is supplied. This is very 
similar to LDOS as supplied for the 
TRS-80 Model III, but is modified for 
the Lobo unit. CP/M 2.2 is also 
available for the MAX-80. The MAX- 
82 Basic Computing 



80 runs either system with no 
hardware modifications. It uses 
whichever operating system is put 
into the first drive and booted. 

When first unpacked, I noted that 
in addition to all of the I/O capa- 
bility, the power supply was also 
inside the unit. Placing so much into 
such a small package always makes 
me worry about heating problems. I 
powered up the unit for a couple of 
hours while reading the operation 
manual. After two hours, the rear of 
the keyboard was slightly warm. 
Twelve hours later, the keyboard 
was still only slightly warm. Follow- 
ing hours of continuous use, the 



In addition to being a 
superb TRSDOS-type 
computer, the MAX-80 
shines as a CP/M system. 
A little more than 56K is 
currently available for 
program use. 



MAX-80 showed no ill effects due to 
heat. 

The keyboard has 76 keys, four of 
which are function keys. A numeric 
keypad with an enter key is placed 
next to the function keys. The layout 
of the keyboard is different from a 
TRS-80 Model I or III. The return key 
is placed on the same row as the 
letter P key. A rightarrow key is 
located where one used to a Radio 
Shack computer would expect to find 
the enter key. This layout seems to 
have been done to place the arrow 
keys in a diamond shape with a clear 
key in the diamond center. I found 
that it took a few days to get used to 
the Lobo layout. An escape and 



control key, both of which are 
necessary for CP/M use, are located 
on the left side exactly where they 
should be. Although the keyboard 
has excellent feel and no bounce, I 
think it could be improved by adding 
a slight depression to the F and J 
keys for locating the home position. 
The design of the unit provides an 
excellent palm rest. 

All interfaces are brought out to 
the keyboard back panel. Standard 
edge connectors are used for the 
drives and parallel printer, and they 
are gold plated. Two standard RS- 
232C connectors for serial ports, 
reset button, time set, video output 
and a boot drive select switch are 
also on the rear. In spite of so many 
connectors to hook up, the unit is 
very simple due to the silk screened 
labels at each connector and excel- 
lent documentation. 

An I/O bus connector is also 
provided, with all of the data lines 
and the lower address lines a la TRS- 
80 Model III. The bus is very well 
documented in the manual. One 
item that is missing is a cassette 
interface. This is strictly a disk- 
based system. The cassette I/O will 
be missed by people who have used it 
for sound generation. 

A nice touch in conjunction with 
the parallel printer port is a tiny 
switch just inside the edge connector 
to defeat the automatic linefeed after 
carriage return some printers 
F~oduce. A mini dip switch is also 
accessible from the rear that selects 
the type of drive for the Lobo to boot 
up on. You can choose 5- or 8-inch 
floppy or hard disk. 

A small, removable, panel on the 
bottom allows access to the 
batteries, if required. These are used 
to keep the real time clock running 
when the Lobo is turned off. During 
power-on, the batteries are 
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automatically recharged. This 
panel also allows access to jumpers 
for specialized configurations. 
Except to add memory (in case you 
forgot to order a Lobo with the full 
128K), there is no reason to open up 
the computer. My excuse was that I 
wanted to see the inside! If you do 
open one up, please read the section 
in the manual that describes how to 
do it. It would be easy to break the 
small speaker wires. 

Inside is a custom linear power 
supply and two boards. The upper 
one holds the keyboard and the 
heart of the computer is on the lower 
board. All the major integrated 
circuits are in sockets. The boards 
are very well laid out, well labeled, 
and have no jumpers. The Lobo 
design is just that, a design, and not 
an afterthought. Those of you fa- 
miliar with the Lobo expansion 
interface that was made for the TRS- 
80 Model I will be happy to know 
that Lobo builds computers with the 
same approach; clean layout and 
heavy-duty construction. 

An Amdek Model 300 video 



monitor is supplied with the Lobo. I 
would not recommend buying a 
monitor with any less bandwidth 
than the Amdek, as the 80-character 
by 24-line mode with CP/M does 

MAX-80 interior circuitry 
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require a monitor this good for com- 
fortable viewing. The video output is 
controlled by a Hitachi CRT 
Controller (CRTC) chip. The 
complete data sheet for the CRTC, 
all 50 pages, is included in the 
manual. This is a very good 



controller and its use gives the Lobo 
some really fast video scrolling. 

Lobo's speed is primarily a 
function of the computer's clock, 
which is running at 5 megaHertz. 
There is just no comparison in speed 
to a Model III running at 2 
megaHertz. As of this writing, the 
Lobo is probably the fastest Z-80- 
equipped microcomputer generally 
available. There is no way to slow 
the clock down, which means that 
video games written for a TRS-80 
will be far too fast on the Lobo. 

Documentation supplied with the 
computer is very complete. The 
manual is a preliminary version 
dated October, 1982. This manual 
has a lot of ground to cover because 
it discusses set-up options and all of 
the MAX-80 technical areas. It also 
supplies a few touches of light 
humor here and there which help 
when the going gets tough. I did find 
a few minor problems with the 
description of generating a different 
sized bootable CP/M disk. The 
information is there, but it is tricky 
to follow the first time. It was only 



FINALLY 



80 x 24 VIPEG 
PLUS! CP/M® and 112 

for TRS-80® MODEL III & I 





Other products: MOD. Ill 

* "Sprinter III'"" 

3,4 or 5 mhz speed up 99.50 
Doubles your speed 

* "DISK CONTROLLER/ 
CLOCK 

Battery-powered clock 
calendar, 8" capability, and 
double density Assembled 
board only, 
DX-3D 229.50 



"V!D80~" 

• 80 Character Display 

• Reverse video 

• 16K added ram 

VX-3 $279.95 

• VX-3, 64K CP/M . . $399.00 

• VX-3, CP/M and 

Added memory . . . $524.00 
DISTRIBUTORS: 
CANADA— M&M Micro Mart 

Quebec Canada (514) 713-9486 
EAST COAST— Bi-Tech 

Bohemia, NY (800) 645-1165 
MIDWEST— Level IV Products 

Livonia, Ml (800) 521-3305 
MIDWEST— Soft Sector Marketing 

Garden City, Ml (800) 521-6504 
SOUTHERN— Digital Distributing 

Dallas, TX (214) 330-1332 

DEALER INQUIRIES INVITED 




(801)261-5652 



5175 Green Pine Drive Salt Lake City, Utah 84107 
CP/M is a registered trademark of Digital Research 
TRS-80 is a registered trademark of Tandy Corporation 
One year warranty on all products. Add shipping/handling— $5.00 U.S. and Canada. All 
others add 15%, Prices subject to change without notice. For information send self- 
addressed stamped envelope Reader Service takes 8 weeks 
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The AITech LISP interpreter comes with a full range of 
LISP functions, including: function tracing, error trapping, 
propertylists, lambda and nlambda function definitions, 
strings and string functions. Special features include 
graphics and other visual display commands, commands 
to randomly access files, while and for loops, double and 
single precision floating point numbers, multidimensional 
arrays, trigonometric and exponential functions, automatic 
conversion from integers into floating point numbers, 
automatic closing of expressions with left and right 
brackets, fast pretty printing and abbreviated quoting. 
Perhaps most importantly, the AITech LISP interpreter is 
one of the fastest high-level language interpreters 
available for microcomputers on the market today. 

The AITech LISP system includes the LISP interpreter, 
an expression oriented LISP editor, and a manual. A sym- 
bolic differentiator and algebraic simplifier and a poker 
player are also included . The system diskette with manual 
sells for $79.95. 

To order send check or money order and please specify 
model (Washington state residents add sales tax). 

For more information or a free brochure call 206/644-3068 or write 
Artificial Intelligence Technologies, 2121 N.E. 152nd, Redmond, 



WA 98052. 

INTELLIGENCE 

IS OUR 

MIDDLE NAME 
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*TRS-80 is a trademark of Tandy Corp. 
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through trial and error that I found 
the caps-lock key for CP/M to be the 
Fl key. Complete guidelines for 
hooking up non-Lobo drives are 
supplied. A very thorough 
discussion of set-ups for a variety of 
drive configurations is presented. 
The MAX-80 will work with almost 
any combination of 5-inch drives, 
single- or double-sided. 

In addition to the Lobo manual, 
the LDOS operating system comes 
with its own documentation. This is 
the standard LDOS zillion-page 
manual. In the front of the LDOS 
manual are a few pages of MAX-80 
additions. Although this is a special 
version of LDOS for the MAX-80, the 
message regarding the real-time 
clock (no longer accurate) still 
appears after a format or backup. 
This should be corrected, as the real- 
time clock in the MAX-80 is just that, 
a real-time clock, and will remain 
accurate before, during and after 
backups and format utilities are 
executed. If you are an LDOS user 
and happy with LDOS, you will love 
it on this computer. All of the 
extensive bells and whistles that 
LDOS is noted for are there — they 
just run much faster. 

If you are not familiar with LDOS, 
you will find that it is a very 

Rear view of Lobo's keyboard 



powerful TRSDOS-type disk 
operating system. Some Radio 
Shack software may require 
patching to run with LDOS. Logical 
Systems, Inc., creators of LDOS, 
provide simple-to-use patches where 
required. Lobo's ad states that 
LDOS will allow you to run standard 
Radio Shack software. In general, 
this is true, but don't expect to see 
the special character set used by the 
Model III. In its current form, LDOS 
for the MAX-80 does not generate 
these characters. Also, as noted 
above, most games written for the 
Radio Shack computers will be 
impossible with the MAX-80 
because of the 5 megaHertz clock. 

If you don't like LDOS, expect to 
see DOSPLUS available for Lobo's 
powerhouse before the end of the 
year. At least that was the answer I 
received from the good people in 
Florida in response to my phone 
inquiry. I tried a similar call to the 
NEWDOS folks in Denver, but they 
stated that they did not expect to 
produce a MAX-80 version. 

In addition to being a superb 
TRSDOS-type computer, the MAX- 
80 shines as a CP/M system. A little 
more than 56K is currently available 
for program use. This is enough to 
run all major CP/M programs. The 
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version of CP/M supplied is 2.2, but 
Lobo will introduce a version of 3.0 
(CP/M Plus) for 128K versions soon. 
This will be a welcome addition, as it 
will allow the system to take full 
advantage of the extra 64K RAM. 

Lobo has devised a slick use for 
the extra 64K of RAM under version 
2.2. This section of memory can be 
configured as a memory-based disk, 
with a IK directory and 63K free 
space. The overlays for WordStar fit 
right in and allow you to have 
instant help messages. If you are 
used to WordStar on a conventional 
system, even one with a hard disk, 
you will find the speed awesome. 

A redefinable character set is 
available with the CP/M operating 
system. It requires modifying a 
supplied character set source code 
and reassembling it. This could be a 
lot easier with a menu-driven 
program. Utilities such as this allow 
you to draw the characters on the 
screen in an enlarged format and 
save them back as files. 

The keyboard is remappable 
under CP/M, which allows you to 
redefine any key to any character. 
Notable exceptions are the four func- 
tion keys which cannot be redefined 
under this release of CP/M. I hope 
Lobo implements this as soon as 
possible. It would be very nice to be 
able to define function keys for use 
with WordStar and other programs 
that use a lot of control sequences for 
cursor control. 

Terminal control codes are fully 
documented for the Lobo. Although 
no inverse video is generated, a half- 
intensity mode is available. In 
addition to cursor position codes, the 
video also provides for "erase to end 
of line" and "erase to end of screen." 
The erase to end of line is not 
implemented by some of the CP/M 
computers I have used, and if 
absent, can preclude running some 
of the popular business packages. 

Another nice feature of this CP/M 
is its ability to copy files written on 
other formats, including the 
Omikron, Xerox and Osborne single 
density. Lobo has addressed the 
problem of lack of standards among 
5y 4 -inch disks using CP/M. This 
pretty well insures that you will be 
able to get any CP/M program in a 
format that can be read into a MAX- 
80. 
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All is not perfect with this pre- 
liminary version of CP/M. I noted 
before that the function keys cannot 
be programmed. When I tried the 
system using a 40-track single-sided 
drive on A and two 5 1 / 4 -inch 77-track 
drives as B and C, the poor MAX got 
a little confused. During a warm 
boot from one of the 77-track drives, 
quite a bit of time was used with the 
system trying to remember what 
types of drives were in use. 
XCONFIG.COM, the program that 
is supposed to handle this, needs a 
little more refining. 

During the month I had the Lobo 
for testing, it worked hard and well. 
This equipment is designed for con- 
tinuous use. The Lobo drives, 
especially the 5V 4 -inch, are a bit 
more expensive than some other 
makes, but are probably well worth 
the few extra dollars. The drive 
housings are big and rugged, and 
include cooling fans. Lobo just 
doesn't believe in flimsy equipment. 
Another point to consider regarding 
the Lobo drives is that they, like the 



computer, carry a one-year 
warranty. 

The real-time clock is nice for 
automatic date stamping of files 
with LDOS and will be a feature of 
CP/M 3.0, when it is released. The 
clock is also a nice feature of 
Maxcomm, a terminal program I 
tested on the MAX-80. This terminal 
program gives you a message 
showing how long you have been 
logged onto a remote computer 
system such as The Source or 
CompuServe. 

Both operating systems per- 
formed without any significant 
problems. LDOS has been bug free 
for a long time and can run circles 
around TRSDOS. The Lobo CP/M is 
referred to as a preliminary version, 
but it is a lot better than many 
versions I have tested on computers 
costing much more than the MAX- 
80. 

Lobo supports the hardware and 
software they make with good docu- 
mentation and very patient people 
over the phone. In addition, a user's 



group called "MAXIMUL," located 
in Florida, seems to be very active. 

For more information, contact 
Lobo Systems, 358 South Fairview 
Ave., Goleta, CA 93117, (805) 683- 
1576. 

CP/M is a trademark of Digital 
Research, Pacific Grove, CA. 
WordStar is a trademark of 
MicroPro International Corp., San 
Rafael, CA. The Source is a 
trademark of Source Telecomputing 
Corp., McLean, VA. CompuServe is 
a trademark of CompuServe Net- 
work Services, Inc., Columbus, OH. 
LDOS is a trademark of Logical 
Systems, Inc., Mequon, Wl. 
Maxcomm is copyright by Modular 
Software Associates, Glendale, CA. 
MAXIMUL MAX-80 user's group: 
MAXIMUL, Box 19525, Orlando, FL 
32817-9525. Omikron is a trademark 
of Omikron, Berkeley, CA. Dosplus 
is a trademark of Micro-Systems 
Software, Inc., Boca Raton, FL. 
Newdos is a trademark of Apparat, 
Inc., Denver, CO. 
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IALL SOFTWARE INCLUDES SOURCE CODE I 
' PRICE INCLUDES FULL SUPPORT I 
I s$s TAX/PACK =$= | 

I TAX/PACK FOR PRACTITIONERS IS COMPLETE, COORDINATED, J 
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TIAL OR FULL SYSTEM. CAN BE USED FOR SINGLE Of» 
MULTIPLE RETURNS. EXTREMELY FLEXIBLE. C0MPUTIN6 
TAXES FOR OVER FIVE YEARS . STILL $750.00 TIL SEPT. 83. 
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The Comstar Research 



... is the lowest cost, assembled, ready- 
to-go, 300-baud modem on the marketfor 
the computer operator on a budget. 




Model l/lll with 16K, Level 2 BASIC required. 

• Software & instructions included 

• No expensive RS-232 needed 

• Direct-connect 

• and, best of all: $99.95* 

Now for the Color Computer, the Comstar Modem comes assembled and ready to go 
(less the videotex software) at the same low price of $99.95. 

C.O.D., Check or Money Order 

Comstar Research 

P.O. Box 771, Madison Heights, Ml 48071 
(313)541-4840 

'shipping & handling add S3 00 COD., Alaska, Hawaii or Canada add S5.00 
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Spencer Hall, Associate editor 



KEYFIL, the short and simple bit 
of source code which accompanies 
this article, contains so much that 
needs explanation that I'm at a loss 
where to begin. Perhaps I should 
start by telling you that once upon a 
time, there was a reader of Basic 
Computing who saw some source 
code, typed it in under BASIC and 
entered RUN. 

Please don't laugh. If you stop to 
think a moment, you'll realize that 
it's a perfectly logical mistake if one 
is new to computing. The angry 
letter he wrote to the editor was both 
eloquent and scholarly. Let me tell 
you now what we told him. 

Source code is a series of 
messages, not to the computer, but to 
the editor/assembler program. We 
want some machine language code 
which will do certain things. We 
want it to contain certain messages 
and we want to put it at a certain 
place in memory. As we found out 
last month, writing this code and 
putting it where we want it is very 
tedious business. That's why we buy 
ourselves a version of EDTASM. 
You'll need one of these versions to 
follow the rest of this article. Boot it 
up now and we'll talk. 

Every line you write with 
EDTASM must have a linenumber. 
These numbers come automatically, 
just as they do in BASIC when the 
AUTO command is invoked. To 
start them, simply respond to the 
prompt, which is an asterisk (*), by 
entering a capital I. The first line- 
number will default to 100, written 
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00100 

00110 

00120 

00 1 30 

00140 

00150 

00160 

00170 

001 80 

00190 

00200 

00210 

00220 

00230 

00240 

00250 

00260 

00270 

002S0 

00290 

00300 

00310 

00320 

00330 

00340 

00350 

00360 

00370 

00380 

00390 

00400 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 

00490 

00500 



ORG 32000 

5— SUBROUTINE TO PRINT TEXT ON THE SCREEN - 



PRINT 



LD 

OR 

RET 

LD 

INC 

INC 

JR 



A, (HL) 

A 

Z 

CDE) 

HL 

DE 

PRINT 



ft 



?GET ft BYTE FROM TEXT 

?TEST: IS IT 0? 

UF SO, BftCK TO CftLLER 

5 else send to crt 
;next chr. in text 

5NEXT SCREEN POSITION 
; REPEAT THIS ROUTINE 



SUBROUTINE TO FILL SCREEN USING LDIR — 



?GET BYTE FROM HERE 
?ftND PUT IT HERE 
?"PLftNT" CHR. IN 1ST POS. 
?PUT 1023 IN COUNTER CBC) 
?FILL 1023 ADDRESSES! 



FTLSCN LD HL, 3C00H 

LD DE, 3C01H 
LD CHL), A 

LD BC, 03FFH 
LDIR 
RET 

? — PROGRAM STARTS HERE — 

BEGIN CALL 01C9H ; ROM ROUTINE FOR CLS 

LD HL, TITLE 5TEXT TO PRINT 

LD DE,3CDDH ;PUT IT HERE 

CALL PRINT ;DO IT' 

LD HL,ANYKEY ;TEXT TO PRINT 

LD DE,3D96H ; PU T IT HERE 

CALL PRINT ;DO IT 1 

LD HL,USEBRK ;TEXT TO PRINT 

LD DE, 3E17H ; PUT IT HERE 

CALL PRINT ;DO IT' 

GETKEY CALL 0049H ; rqm CALL - P,FT KFVQTBnur 

i «.ROM 0049H WAITS FOR KEYSTROKE - PUTS IT l£ REcf a! 

C -l mH ? WAS IT BREPK KEY (n? 

m, p't^pm" ? IF SO - BACK TO BASIC 

tp nl™2^ ?FILL SCREE N WITH IT 

. __ QQ r tt bvtcc cnS rr ?WftIT F0R MOTHER STROKE 

" ~ CI1 BYTES F0R TEXT G0 ftT END OF PROGRAM — 

T! ^ DEFM 'KEYFIL 7 

DEFB 

DEFM 'ANY KEY FILLS SCREEN' 

DEFB 

DEFM 'USE <BREAK> TO EXIT' 

DEFB 

END BEGIN ; ADDRESS TO START PROGRAM 



TITLE 

ANYKEY 

USEBRK 



00100, and each new line will have 
an increment of 10. You can select 
your own linenumber and your own 
increment by entering them after 
the I, thus: 110,5. This starts you at 



line 10 and increments lines by five 
each. You can't just insert a line 
between two others as in BASIC. 
You must ask for it with the I 
command. 



Chips 



Remarks, titles, or what have you, 
which are not to be assembled, can 
be written just about anywhere. 
Simply precede them with a 
semicolon. We've used this feature 
quite a bit in the source code for 
KEYFIL. 

Following the linenumber, there 
are three "business" columns which 
EDTASM reads to find out what you 
want done. The first is the label 
column. In most cases, you will leave 
it blank. Simply tab over it using the 
right arrow key. We'll talk about 
labels in a moment. Next comes the 
operator, action or verb column. 
Here there must be a standard Z80 
symbol for one of the operations 
which the Z80 can perform. After 
entering it, tab with the right arrow 
once more and you are in the third 
(or operand) column. Register 
names and numbers go here in strict 
patterns called for by assembly 
language. It's a good idea to hit the 
right arrow twice to get over to the 
next column, because the operand 
column can sometimes be quite long. 
This last column is for you to use as 
you see fit. Don't forget to start it 
with a semicolon so EDTASM won't 
try to compile it. use it to describe the 
purpose of the code you have just 
written. Unlike BASIC, source code 
doesn't reveal its purpose easily. 
Good remarks are a must so that 
you'll know tomorrow what you 
were trying to do today. 
So, there you have two kinds of 



lines written with EDTASM. One is 
the remark line, beginning with a 
semicolon, like line 190 in KEYFIL. 
The other is the regular operation 
line with its optional first column 
and mandatory second and third 
columns. The operation line, 
assuming you have written it 
correctly, will cause EDTASM to 
generate a Z80 instruction of from 
one to four bytes when you ask for an 



Most programmers use 
hex numbers, not 
because they are 
intellectual snobs, 
but because there 
are several good 
reasons for doing so. 



assembly. There is one more very 
important kind of line you can write 
with EDTASM. It's called a pseudo- 
op. 

To understand what is meant by 
pseudo-op, you must remember that 
source code is not a message to your 
computer. It's a message to the 
EDTASM program. There are a 
number of pseudo-ops. Their 
purpose is to give EDTASM some 
important instructions you want it 



to follow when it assembles your 
source code into machine language. 
EDTASM does not translate pseudo- 
ops into machine language. It 
simply obeys the instructions they 
contain. 

The command, or operator, in a 
pseudo-op is always written in the 
second (operator) column. First, and 
foremost, of the pseudo-ops is ORG. 
This is the message which tells 
EDTASM where in memory you 
want your machine language to 
reside. Please note that we said 
reside. We did not say, or even imply, 
that program execution must start 
at this location. That message to 
EDTASM will come later. 

In our sample, we want the code to 
reside (start) at address 32000 
decimal. Note that EDTASM 
understands decimal numbers. In 
fact, you must add a capital H to 
identify a hex number. Most 
programmers use hex numbers, not 
because they are intellectual snobs, 
but because there are several good 
reasons for doing so. One of the most 
obvious of these reasons is that there 
are often times when it is necessary 
to break up a number into its LSB 
and MSB. This can be done 
instantly with a hex number. 

There are three other kinds of 
pseudo-ops in our sample. Lines 440, 
460 and 480 use DEFM. This tells 
EDTASM that the ASCII bytes for 
the text between apostrophes must 
be placed right here. In the case of 
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• FREE SHIPPING • 

Within Continental 48 States 




MORE MAXI'S 

MANAGER w/utility (B.O). .$119.95 

MAXI UTILITY $44.95 

MAXI CRAS Mod i/iii $84.95 

MAXI MAIL Mod III $84.95 

MAXI STAT Mod l/lli $164.95 

LAZYWRITER Mdi i/m $149.95 

NEWSCRIPT 7.0w/labels . . $119.95 

LDOS Ver. 5.1 Mod I or III $109.95 

DOSPLUS 3.5S/3.5D/3.5III. . . .$119.95 

MULTIDOS 1.6SD/DD/IM $89.95 

GEAP w/Dot Writer 1.5 $84.95 

SUPERUTILITY + ver. 3.0. $59.95 
D ATA-WRITER Mdl l/lll $124.95 

LNW SPECIALS 

LNW80 Mdl II $1,795.00 

Expansion II 349.95 

5/8 Doublerw/Dospius3.4D . . 199.95 



Chips 



ZIP BOX RELOADS y 2 Dz. Dz. 

Epson MX 70/80-20 Yds 24.00 42.00 

Epson MX 100-30 Yds 30.00 52.00 

NEC/Prowriter 2100 36.00 

Centronics 730/737/739/779 or 

LP-l/ll/IV-16Yds 18.00 32.00 

All ZIP BOXES are individually sealed black nylon and 

require no rewinding Epson Reloads also available in 
red, blue, brown, green & purple. Any mix allowed 

CARTRIDGES Each Dozen 

Epson MX70/80 7.00 70.00 

Epson MX100 12.00 125.00 

Prowriter 8510 & NEC 8023A . 7.50 80.00 

RSLPIII/V 6.50 70.00 

RSLPVI/VIII 6.50 65.00 

RS DSY WH II or DWP 410 .. . 6.50 70.00 

RS DSY WH II • Nylon 6.50 70.00 

MICRLNE80/82A/83A/92 ...HI A 30.00 

MICRLNE 84 V 2 x40 yds 5.50 60.00 

Diablo Hytype II - Mum 'strike. . . 6.50 65.00 

Qume - Muiti strike 5.00 50.00 

NEC Spin- Hi Yld -Mum strike .7.00 70.00 

Centronic 703/04/53 11.00 120.00 

Minimum order 3 cartridges - any mix For smaller 
quantities add $150 per order All our reloads and 
cartridges are manufactured by one of the oldest and 
most reputable ribbon Mfg's in the country 
***** * QUALITY GUARANTEED* ***** 

SEE OUR EXPANDED ADS IN 
80 MICROCOMPUTING 

SEND FOR YOUR FREE CATALOG. 

ORDERING INFORMATION 

No credit cards at these low prices. Add $2.00 on all 
COD orders Certified Ck/MO/COD shipped immedi- 
ately Please allow 2 weeks for personal checks. For 
extra fast service phone in your COD order Free ship- 
ping within Continental 48 states via UPS ground. For 
Canada, Hawaii, Alaska, applicable shipping and in- 
surance charqes apply. Prices subject to change with- 
out notice New York State residents please add 
appropriate sales tax. 

The items listed above are a cross-section of our 
product line. We carry the full line of most companies 
listed in the ad, plus much more. SEND FOR YOUR 
FREE CATALOG. 



14603 25th Road, Dept . B 
Flushing, New York 11354 

Mon.Thurs (21 2) 445"71 24 Fri. * Sat 

10A.M.-9P.M. ' 10A.M.5P.M. 



the word KEYFIL in line 440, "right 
here" means the RAM addresses 
immediately following the object 
code for JR GETKEY. Lines 450, 
470 and 490 use DEFB. This means 
that the byte right there must have a 
value of zero. This could have been 
any value up to FFH, which we 
might have chosen to place in the 
operand column. 

The last pseudo-op in our sample 
is the word END. There must be an 
END after any code you want to 
assemble. Without this word at the 
end of your source code, EDTASM 
will send you an error message. 
There doesn't have to be anything at 
all in the operand column. Putting 
something in the operand column 
has a totally illogical, but very 
important, effect. 

You will note that our sample has 
the word BEGIN in the operand 
column. This is a repetition of the 
word in the first, or label, column of 
line 270. Words in the label column 
have just one meaning. They stand 
for the RAM address where the bytes 
called for in that line will begin. The 
operand of the END pseudo-op tells 
EDTASM that execution of this 
little program must begin with the 
code generated by line 270. The code 
at 32000 decimal, which we have 
identified by the label PRINT, is 
only a subroutine. It will be called by 
name when it is needed. 

I hope the incredible power and 
ingenuity of the editor /assembler is 
beginning to sink in. In addition to 
remembering all the 700-plus in- 
structions which the Z80 is capable 
of executing, it notes the starting 
location specified in hex or decimal 
notation by ORG and counts out the 
exact RAM address relative to this 
starting point which corresponds to 
every label the programmer puts in 
column one. Whenever you see a 
label used in column three 
(operand), remember that it is just a 
RAM address to be calculated by 
EDTASM. 

There isn't room in this issue to 
explain the numerous other 
machine language matters illus- 
trated by KEYFIL, so why don't you 
just type it in and assemble it? To get 
that independent creative feeling 
you may want to change the label in 
line 270 to HERE, or RUN, or any 
other word (six letters or less) that 
comes to mind. If the first character 
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is a letter, numbers will work. How 
about C3P0? Just be sure to use the 
same word as the operand in line 
500. You can also have fun by 
changing the text in lines 440, 460 
and 480. The hex numbers in lines 
290, 320, and 350 are the respective 
screen starting points for the three 
strings. You may want to fool 
around with these, too. 

To assemble KEYFIL, respond to 
the prompt (*) with the letter A, leave 
a blank and write the filename, 
KEYFIL. Press enter and you'll see 
the whole program compiled on the 
screen. You may want to use another 
filename such as JUNK. You can't 
use GARBAGE because filenames 
can only be six letters long. 

Speaking of garbage, it might be a 
good idea to type a slash after the 
filename, followed by the letters WE. 
This so-called "switch" tells 
EDTASM that you want it to stop 
(WAIT) when it finds an error. You'll 
probably have some. If you do, 
answer the prompt with E, followed 
by the number of the defective line. 
You'll be in an edit mode which is 
virtually identical with the Level II 
BASIC editor. 

When EDTASM goes all the way 
and reports 00000 ERRORS, you'll 
get a prompt to ready your tape or 
disk. You can now create a SYSTEM 
file which, when executed in the 
usual way, fills the screen with any 
character you touch on the 
keyboard. (What did you expect? 
VisiCalc?) 

There's a lot more to be said about 
this simple little routine. It will have 
to wait for next time, but you don't 
have to. Study the code. Study your 
EDTASM manual. Study also Mr. 
Rodnay Zaks's excellent book called 
How to Program the Z80 (available 
from Radio Shack). Best of all, find 
yourself the source code for a 
program you would like to have. 
Typing it in is the best possible way 
to enhance your understanding of 
Z80 language. The seven 
installments of In the Chips have 
taught you enough so that these 
activities will have real meaning. 
Your understanding of machine 
language will now grow by leaps 
and bounds. From here on, In the 
Chips will try to identify some of the 
mysteries you will encounter in your 
own explorations and clarify them. 
Happy programming! 
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Galactic Attack 
Color Computer 
Radio Shack Stores 
and Dealers 
$29.95 

Radio Shack has Just released a new 
arcade game for their Color Computer. 
Galactic Attack is a ROM pack game 
that may be used with any Color 
Computer with joysticks, and is priced at 
$29.95 in their stores. 

The theme is a familiar one; you defend 
your territory from the unending assault 
of alien spacecraft. The aliens here have 
ships that are modeled after Darth 
Vader's fighters and seem just a bit 
better equipped to deal destruction than 
were Darth's. They attack in groups of 
eight ships at a time but are not restricted 
to remaining in formation. Any ship, or 
even more than one, may break out of 
formation and attack you with dive 
bombing attacks. 

If you are skilled enough to destroy all 
eight aliens in one group, before any of 
them can fly off of the bottom of the 
screen, the next attack will be a "night 
attack." If you are then able to destroy 
the first wave of night attackers before 
any get by, you get four times the points 
during the next attack. If one gets by, the 
next attack will be a "daylight attack" 
and points return to normal. 

The graphics are good and the action is 
fast in this game. The aliens jump 
around enough to make this more than 
just a target shoot. There is a built-in skill 
factor that makes each wave of attackers 
a little quicker than the last so that you 
have to try a bit harder. 

The left joystick is used to control the 
position of your laser base. The joystick 
is very fast acting in the game — almost 
to the point of being touchy. This adds to 
the skill requirements of the game. You 
must learn to control that joystick, or you 
will go sliding all over the screen, col- 
liding with alien ships. 

I found the game to be a challenge and 
consider it to be worth the $29.95 that I 
paid for it. The only complaint I have is 
the quick response of the joystick, but 
that is because it makes me feel like 
such a klutz. The sound effects could 
have been done better than they were, 
but they are acceptable. 

J. L. Latham 



The Basic Answer 
Model I/III 
Logical Systems, Inc. 
P.O. Box 23956 
Milwaukee, WI 53223 
(414) 355-5454 
$69 + s/h 

The Basic Answer is the answer to 
many problems faced by programmers 
using BASIC. But, just .what are the 
questions it's supposed to answer? First, 
consider that linenumbers are required 
in a BASIC program. How many times 
have you wished you could GOTO or 
GOSUB to a named routine, like: 
GOSUB @GETINPUT? The Basic 
Answer allows this by removing all 
constraints imposed by linenumbers. 
They aren't used at all unless the editor 
you're using is BASIC itself. How would 
you like to use long variable names that 
mean something like: INDEXNUM%, or 
CUSTOMERS? Well, you can with The 
Basic Answer, TBA for short, from 
Logical Systems, Inc., the distributors of 

LDOS. 

TBA is not really a compiler, although 
what it does is closely related to 
compiling. It's really a translator. It 
translates code written in structured, 
easy-to-read (and debug) BASIC into a 
Level II or Disk BASIC-runable 
program. The source code for TBA is 
intended to be written with LED (also 
from Galactic), or with Scripsit modified 
with the LSCRIPT/FIX provided with 
LDOS, but the regular Disk BASIC 
editor may also be used. In fact, any 
editor that writes an ASCII file will 
create the source code for TBA. This 

Listing 1— Basic Source Code 



3 CLS 

4L I NE INPUT "Enter the SOURCE file : 
3L I NE INPUT "Enter DESTINATION "file : 
&PRINT"Copying file *iF8«!" to "FT* 
70PEN"R",l,F5» t l:0PEN"R",2,FT», I 
BF1ELD1,! AS BU*:FIELD2, 1 AS BV* 
9F0R [N7. = 1 TD LOFU) 

10GET 1,INX 

i 1LSET BV* = BU* 

12PRINTB512, INXS 

13PUT 2, I NX 

14NEXT IN* 

13PRINT"FILE COPIED" 

1ACLOSE 

17END 



-JFS* 

"J FT* 





means that all the global search and 
replace functions as well as the other 
powers of your word processor are at your 
disposal when programming. 

The manual states that Superscripsit 
may be used as well, but I think that it 
would be cumbersome converting the file 
back and forth between Scripsit and 
ASCII, as would be necessary with Radio 
Shack's newest word processor. The 
object code produced by TBA is a 
complete, ready-to-run BASIC program. 
Labels are used in place of linenum- 
bers. A label will be any fourteen -char- 
acter string which begins with an @ sign, 
followed by an alphabetic character, 
optionally followed by up to twelve other 
alphanumeric characters including the 
underline and period characters. In order 
to be declared, a label must begin a line. 
Subroutines are preceded by the label for 
that subroutine. When the label is 
referenced, it may appear anywhere in a 
line as though it were a BASIC line- 
number. The @ sign tells TBA that it is 
working with a label. TBA stores these 
labels internally during processing and 
converts labels to linenumbers. 

A variable, like in Level II BASIC, 
must begin with a letter. It may be up 15 
characters in length, but it must have at 
least 3 — the last of which must be one of 
the type-specifier characters: !, #, %, or $. 
It is these type-specifiers that tell TBA it 
is working with a variable. The program 
will convert these to the standard two- 
character variable names that BASIC 
expects and will retain the type-specifier 
character. For the new user, it will be 
difficult at first to deal with the concept 
■ of local and global variables. A local 

Listing 2— After Conversion by TBA 



=FSPEC* , BUFFER 1 * , BUFFER2« , FSPEC2* , I ND€ XX 
SFILECOPY 

CLS 

LINE INPUT "Enter the SOURCE fil« : "iFSPEC* 
LINE INPUT "Enter DESTINATION file : ";FSPEC2* 
PRINT "Copying fil« ";FSPEC»»" to "F5PEC2» 
OPEN"R",t F FSPEC*,l:DP£N"R- t 2,FSPEC2« 1 1 

FIELD 1,1 AS BUFFER 1*:FIELD2, 1 AS BUFFER2* 
FDR INDEX* = 1 TO LOP U > 
GET 1, INDEX* 

LSET BUFFER2* = BUFFER 1* 
PRlNTa5l2,lNDEXXS 
PUT 2, INDEX* 
NEXT INDEXX 
PRINT'TILE COPIED" 
CLOSE 
END 
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variable is one that is used in a 
subroutine and is known only by that 
routine. For example, you may have a 
TEMP$ located in several subroutines, 
and it will be translated to a distinct 
variable in each one of them. A global 
variable will be used throughout the 
program and will have the same name 
wherever it is encountered. All variables, 
whether local or global, must be declared 
before they are used. This is a discipline 
that should be learned by anyone used to 
programming in unstructured BASIC, 
but it is work to get used to it. If you ever 
intend to learn another language, you'll 
more than likely have to learn this 
concept. If you already program in 
another language, it will be nice to be 
able to use the structured techniques 
you've grown accustomed to. 

After the source code is prepared (see 
Listing 1 for an example of TBA source 
code and Listing 2 for an example of 
what it translates into), it is saved onto 
disk as an ASCII file, and TBA is run. 
First, it will ask you for a source filename 
and use a default extension of /TBA if 
none is given. Next, it asks for the 
destination filename and uses a default 
extension of /BAS. In either case, if a 



slash is appended to the end of the 
filespec with no extension following, 
none will be added. I'd like to see ALL 
application programs assign their own 
logical default extensions this way. The 
system calls to do this have been in 
TRSDOS since day one, and I can't see 
why more programmers haven't taken 
advantage of them. 

Next, the program asks you for proc- 
essing parameters. This allows you to 
specify where the listing output is to go, 
whether lower/uppercase conversion is 
to be made, whether unquoted spaces are 
to be deleted from the object program, 
and what type of cross-reference listing 
is to be produced. There are many 
possible answers to this prompt, but the 
defaults are obtained by simply pressing 
enter. This causes the listing of both 
source and object code to the screen, 
followed by a cross-reference listing to 
the screen. The cross reference listing 
contains the labels you've used and the 
line numbers that were assigned to them. 
It also tells you what each variable you 
have used has been translated into. 

The next (and final) question before 
processing is, "Directives:". Usually, 
enter will be pressed here also, but many 



decisions may be made during 
processing by providing the proper 
directive and testing it in your program. 
If you've used EDAS or assemblers on 
large computers, you'll be familiar with 
this concept. You may, for example, 
control which portions of your TBA 
source code will be translated, based on 
whether you're producing a program to 
run with a Model I or Model III. You may 
also page and title the listing output by 
using the TITLE and PAGE directives in 
your program. TBA knows these 
directives in source code from ordinary 
BASIC statements by the prefix of an 
asterisk as "*IF expression" or 
"*PRLINES". This allows a flexibility 
previously unavailable to the BASIC 
programmer. 

After these questions are answered, 
TBA translates your program in six 
(that's right, six) passes. Pass one strips 
linenumbers off if you've used BASIC'S 
editor and adds its own. During this 
pass, labels are also processed and 
converted into linenumbers. Pass two 
scans for local variables and translates 
them into unique, two-character 
variables that the interpreter will accept. 
The type-specifier character is retained, 




Now you can have a solution to the problem of 

protected software backup. 

COPYCAT© is the most powerful disk backup utility yet 
designed for the TRS-80 Computers. It will automatically 
make a fast, exact copy of your master disk regardless 
of protection schemes used including CRC errors, dual 
density tracks, mixed sector lengths and irregular I.D. 
pack. 

COPYCAT© is intended for your personal use only in 
making backup copies for your valuable protected soft- 
ware. 

COPYCAT© runs on a 48K, 2 disk drive TRS-80 
models I, III or 4. Specify model number when ordering. 

All orders are processed within 24 hrs. 
Non-certified checks require (2) weeks for bank clearance 

'© $ 

■ BHBBBBB 

Add $2.00 for postage and handling. 
California residents add 6% sales tax. 

NISOFT A€S€fl 

2170 W. Broadway, #501 B 

Anaheim, CA 92804 

(714) 772-5000 

Dealers inquiries welcome 
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which makes DEFINT, DEFSTR, and 
DEFDBL unnecessary. Usually, the first 
two characters you've used will be 
retained unless this would result in 
multiply-defined variables or illegal 
character combinations. Passes three 
and four do the same, but with variables 
that have been defined globally. Pass 
five changes label references to line 
number references. In pass six, the 
source and object listings and cross- 
references are produced. 

Now, you might think th at with all this 
processing, TBA would be slow. Nothing 
could be further from the truth! The 
sample listings were translated in about 
30 seconds. Even though I have a 3.5 
MHz clock, there is sufficient disk I/O 
that I'm sure a normal-speed TRS-80 
would take less than 45 seconds. Longer 
programs do not seem to take proportion- 
ally longer. The longest program I have 
processed so far has been about 200 lines 
in BASIC program text after processing, 
and the time was slightly over a minute! 
That's fast. 

TBA processes the two different types 
of REM statements differently. If the 
word REM is used at the first of a line, the 
entire line will be sent to the object file 



unchanged. REM may be used only at 
the start of a line and will cause trouble if 
used elsewhere. If the apostrophe 
abbreviation is used, the line will be 
ignored entirely during the compile 
phase and will not appear in the 
processed code. The apostrophe may be 
used anywhere in a line. 

The documentation provided with 
TBA is almost a masterpiece. Almost, 
because I would have organized it 
slightly differently. But I find no fault 
with the way they did it. It is well- 
written, to the point, and lucid. It is 
liberally laced with examples and the 
more important examples are supplied 
on the disk, already typed in for you. 
There's even a program that will add 
linenumbers to these test files if you don't 
use LSCRIPT or LED and prefer to use 
the BASIC editor. That's thoughtful. You 
should have no trouble understanding 
this manual. 

Its binding is stiff and doesn't lie flat 
when being used. I would prefer the loose- 
leaf format. It is a nice looking booklet 
about 8V 2 by 11 inches, and it's three-hole 
punched in case you would like to place it 
into a notebook. The index, although not 
extremely comprehensive, is more than 



adequate. 

When using TBA, you'll have to realize 
that spaces can be important. If, for 
example, you type in the following line, 
(with no spaces) @LABEL:FORINDEX 
%=1T0100:NEXTINDEX%, TBA will 
think that FORINDEX% is a variable 
and that NEXTINDEX96 is another 
distinct variable. This code will be 
incorrectly written and the object 
program will bomb. The line should be 
written with spaces after the FOR and 
the NEXT in order to be translated 
properly. The =lTO100: will be passed 
unchanged. 

New users may feel that TBA is 
somewhat restrictive. That's true, but it 
teaches good programming practice and 
it is not all that hard to get used to. If 
you're thinking about learning assembly 
language programming, the label 
concept and structured programming 
techniques are an absolute must. 
Because of this, TBA could even be used 
as a learning tool for those intending to 
learn machine language at a later time. 
If you'd like to program in structured 
code, but like the portability and ease of 
BASIC, then TBA is a "must have" 
addition to your software library. It is 



Mode! I (Tape) 
for the RadiO ShaCk™ Mode! IH (Disk) Computer 



Executive Calculator*" 

Over 150 easy-to-use Programs for 
Business and Home 

High quality, user proven Software at a Price you can afford 



Programs For: 

Finance 

Real Estate 

Investments 

Loans 

Leases 

Depreciation 

Charts & Graphs 

Plus Many More 



ALL THIS FOR ONLY $39,95 



Over 150 Proven Programs 

• Complete Users Guide 

• Automatic Update Privileges 

• Complete Source Code 

• Money Back Guarantee 

• We Pay Shipping 

• All Orders Shipped Within 24 Hours 
o Requires 48K, Specify Disk or Tape 



Order with Confidence by Phone or Mail 

MCSSOFTWARE S H 

809 PARKWAY, CONWAY, ARKANSAS 72032 
PHONE 501-327-4443 



TRS-80 Models I, IIS, 4 
VERSATILE DATABASE MANAGER SYSTEM! 

Completely User-Definable! Multi-Drive Capability! 
VERY USER FRIENDLY! 

SPECIAL FEATURES: 

• SINGLE KEY COMMANDS AT MOST PROMPTS! 

• SINGLE KEY REPEAT ENTRY OF DATA! 

• ON SCREEN EDITING AND UPDATING OF ALL DATA! 

• COMPLETE ERROR TRAPPING FOR EASY DATA ENTRY! 

' COMPLETE DATA STATUS UPDATE FOR INSTANT VIEWING! 

• WRITTEN IN BASIC FOR EASY MODIFICATION! 

• DATAFILES CAN SPAN UP TO 8 DRIVES, 5"-8" - HARD DRIVES! 

DATA: 

' NUMBER OF FIELDS - 1 TO 18 FIELDS! 

• LENGTH OF FIELDS - 1 TO 40 CHARACTERS! 

• TYPE OF FIELD DATA - ALPHA OR NUMERIC! 

• FIELD TITLES USER-DEFINABLE - 1 TO 18 CHARACTERS! 

REPORTS AND LABELS: 

• USE AS MANY OR AS FEW FIELDS AS DESIRED! 

• DEFINE PRINT POSITIONS FOR ALL FIELDS! 

• START AND END PRINTING WITH ANY RECORD YOU DESIRE! 

• SELECT BY ANY OF SEVEN SELECTION CODES! 

• SELECT RECORDS BY ANY OR ALL FIELDS! 
" SORT BY ANY FIELD! 

CAPABILITIES: DEPENDING ON SYSTEM CONFIGURATION - 

100 BYTE RECORDS MODEL I, 4 DRIVES = 3000 RECORDS! 

MODEL III. 2 DRIVES = 3000 RECORDS! 
5 MEG HARD DRIVES = 50,000 RECORDS EACH! 
HARDWARE REQUIREMENTS: TRS-80 MODELS I, III, 4 - 48K, 1 TO 8 DRIVES, 132 
CHARACTER OR COMPRESSED PRINT PRINTER! 

INTRODUCTORY PRICE ONLY $39.95l!! 

ONE OF THE BEST DATABASE MANAGERS FOR TRS-80's AVAILABLE TODAY! 
ORDER NOW! Shipped UPS within 24 hours of receipt of order Visa- 
Mastercard-Money Order-Cash-Check (two week delay ).CO.D'sadd $5.00 

CA residents add 6% sales tax 

TREESOFT SOFTWARE COMPANY 

6529 PEMBA DRIVE, SAN JOSE, CA 95119 (408) 224-8609 

TRS-80 tm Tandy Corp 
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SOFTWARE 

for the 16K TRS-80 

Easy-to-use software for models l/lll with tape. disk, 
or network Complete manuals plus on-screen instruc- 
tions As simple as typing CLOAD and RUN 

Each program recorded twice on a separate side of a 
quality, long-lasting cassette 

CLASSROOM PACKS. Each has 4 programs in a subject 
area and permits self-paced study with unlimited 
running time Choice of review or self-test modes plus 
progress reports and help feature Missed questions 
are corrected and recalled until learned Price $44.95 
each. 



Geography I 
U.S. Government 
US. History I 



Driver Education 
Electronics I 
Music Theory I 



Other outstanding cassette software 

• Logic Games Package $24.95 

• Anagrams $19.95 

• Scramble-Grams $19.95 

30-DAY GUARANTEE 
At local dealers or order direct 



edia 

Associates 

Classroom Software 

34S West Robert E. Lee 
New Orleans, LA 70124 

MC & VISA include card # and expiration date Free 
shipping on prepaid and credit card orders Others add 
$1 50 per package 



PEL-TEK Announces 
EXTRAORDINARY VALUES for 

the TRS-80 MOD S/SSI 
Pel Tek's Word Machine Version 2.0 

A full featured line oriented word processor in machine 
languape ... now better than ever with these features: 
® Block graphics (for printers that support it) 
® Embedded printer controls ® Help screen 
® Lower case support for unmodified Mod I's 

• Variable margins, line length, page length, line spacing 
® Access to D.u.S. with warm start re-entry 

® Scroll up/down text • Save/load disk files 

• Insert/delete characters/lines • String search 
® Printer independent ® Simplified commands 

® Twenty-four page typeset manual with command 

summary sheet (Manual FREE with S.A.S.E.) 
Easy to learn, easier to use, now compatible with Aspen's 
RANDOM HOUSE proof reader, 
for Mod l/lll 32/48K Disk $20.00 

The Random House Proof Reader 

From Aspen Software, the best price/performance 

spelling checker on the market today. Based on the 

Random House Dictionary: 

® Shows spelling errors in context 

® Allows immediate correction 

® Add or delete words from dictionary 

® 32,000 word dictionary 

Suitable for use with Pel-Tek's word machine or other 

TRS-80 Mod l/lll Word Processors. 

for Mod l/lll 32/48K Disk $50.00 

SAVE $10.00!! Order Pel-Tek's Word Machine and the 
Random House Proof Reader together for one low price, 

only $60.00 

PEL-TEK 

P.O. Box 1026 ® Southampton, PA 18966 

TOLL FREE ORDER LINE 800 523 2445 

In Pennsylvania Call (215) 947 2334 

• Check or Money Order • Visa, MasterCard accepted 
® Add $2.00 per order for postage and handling 

® PA residents add 6% sales tax 
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easy to learn and well worth its most 
$69.95 price. 

Charles P. Knight 
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Gemini Printers 

Star Micronics, Inc. 

1120 Empire Central Place 

Dallas, TX 75247 

(214) 631-8560 

Gemini-10: $399, Gemini-15: $549 

Centronics parallel standard, 

serial optional 

One of the most expensive peripherals 
for our micros is a printer. We can buy a 
budget modem for $100, or a discounted 
disk drive for $200, but where do we get a 
printer at a bargain? Prices have been 
dropping, but an Epson MX-80 (the most 
popular printer at present) still costs well 
over $500 in the FT version. Now you can 
get a printer that performs similar to an 
Epson, looks like an Epson, but costs 
hundreds less. The new Gemini printers 
from Star Micronics even have a few 
unexpected features of their own. Would 
you believe that they come standard with 
a 2.3K print buffer (expandable to 6.3K), 
three graphics modes, friction and 
tractor feed, 100 cps print speed, and a 
180-day warranty? Well, read on. 

The printer has four indicator lamps 
and three switches located on the right- 
hand side of the top surface. The 
switches are on-line, form feed and line 
feed. The indicators are for power, ready, 
on-line and paper out. The main power 
switch is located on the right side panel 
toward the rear. There is also a large 
knob for manually advancing the paper 
on the right side. The rear panel contains 
the power cord, the standard Centronics- 
type connector, and four small DIP 
switches for setting certain options. 

A smoke-colored dust cover protects 
the print head and drive mechanisms. 
The removable tractor feed insures an 
even and sure paper alignment and is 
fully adjustable for normal 9" pin-feed 
paper, or narrow mailing labels. There is 
also the normal friction feed for utilizing 
normal bond paper or other materials not 
having the pin feed holes. The paper 
loads quite easily and the metal paper 
guide and paper separator work quite 
efficiently. The unit also comes with a 
roll paper holder for use with rolls of 
paper, for economy printing 
applications. The printer weighs 15.4 
pounds (7 kg) in the 10-inch version and 
22 pounds (10 kg) in the 15-inch version. 
The overall impression is that these 
printers are built very solidly. 

The specifications are as follow: The 
print head uses 9 wires, is user- 
replaceable, and has a mean characters 
between failure (MCBF) of 10 X 10 7 



characters. Print speed is 100 CPS at 10 
CPI, and the printer is bidirectional and 
logic seeking. The normal character 
matrix is 9X9 with true descenders, 18X9 
in emphasized mode, 18X18 in double 
strike, 6X6 for block graphics, 60X72 for 
low-res bit-image graphics, and 120X144 
for high-res bit-image graphics. The unit 
has the standard 96 ASCII characters, 96 
italic characters, 64 special characters, 
32 block graphic characters, and op- 
tionally a 96 proportional ASCII 
character set and 32 proportional special 
characters. The available fonts are 
normal (10 CPI), elite (12 CPI), 
condensed (17 CPI), emphasized, double- 
strike, three enlarged fonts (5, 6, 8.5 CPI), 
italics and super/subscripts. 

Gemini-10 



- 
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Special features include self-test, 
continuous underline, backspace, 
vertical and horizontal programmable 
tabs, left and right margin set, seven- or 
eight-bit selectable interface, bit-image 
column scan, and perforation skip. Line 
spacing is 1/6, 1/8, 7/72, and a program- 
mable n/144 inches. The Gemini-10 will 
handle paper from three to ten inches 
wide, up to three sheets, and the Gemini- 
15 will handle a width of five to fifteen 
and one-half inches with three sheets. 
The standard interface is a Centronics 
parallel type, with an optional RS- 
232C/20 Ma current loop serial interface. 
The printer uses a standard Underwood 
spool-type ribbon, making ribbon 
replacement inexpensive and easily 
obtainable. The overall MCBF, 
excluding the print head, is 5X10 7 
characters. 

The printer was tested on a Model I 
computer using the Newscript word 
processor, as well as several other 
programs that give a printed output. We 
contacted Chuck Tesler at Prosoftto find 
out if our Gemini, equipped with the 
optional proportional character set, 
could produce text that was 
proportionally-spaced and right- 
justified. His reply was that the printer 
was incapable of doing this and that 
several users of Newscript had 



complained that his software would not 
drive their new Gemini. We contacted 
Star Micronics about the problem and 
were told that the printer could produce 
proportional characters, but could not 
have them right-justified. Keep this in 
mind if you are considering the pro- 
portional option. One other option is a 
custom 9X9 character set that Star 
Micronics will produce for users with 
special applications. 

The printer has performed flawlessly 
for about three months and has been a 
real workhorse. The tractor feed 
mechanism seems to be well designed 
and we have not experienced a paper j am 
as yet. The built-in buffer is handy and 
would be more so with the addition of the 
optional extra 4K RAM. The character 
set seems to be identical to the Epson 
based on some of our tests. We used the 
Epson driver in Newscript to produce 
some printed output on the Gemini, and 
it appeared to work well. The high-reso- 
lution graphics appear to be another 
story. We attempted to produce hard copy 
on our Gemini using the Powerdot 
program and obtained erratic results. 
Apparently, some of the control codes are 
different in the Gemini. This situation 
will probably change in the future as 
more people purchase the Gemini, and 
the authors of the graphic software 
drivers accommodate the new printers. 
The manual, which is outstanding in 
context and clarity, has some sample 
programs that produce the graphics and 
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they are really nice. The Gemini is a real 
bargain and should sell well. We would 
recommend the added 4K buffer over the 
proportional character set as options. 

Jim Klaproth 



MC-10 Computer 

Radio Shack Computer Centers 

and Stores 

$119.95 

The MC-10 is about the size of a two- 
inch thick paperback book. That's about 
8V 2 inches long by 7 inches wide and 2 
inches tall (or thick, if you like to think in 
terms of books). The all-plastic case 
surrounds a miniature chiclet-style 
keyboard which takes up about half the 
area of the keyboard on its big brother, 
the Color Computer. If you're a five-year- 
old touch-typist, you will be right at home 
with this keyboard. If you're twelve, or 
older, there's definitely trouble ahead. 
The keys are so small that one of my 
fingers can span two keys. 

The computer will provide keywords 
with the stroke of a single key. For 
example, to type the word PRINT into 
the computer, simply press shift 9. That 
saved you three keystrokes. Also, many 
other commands, functions, special 
symbols and graphics characters can be 
generated with a minimum of keystrokes 
by using the shift (key) procedure. There 
is a special control key for generating 
special functions and a limited number 



fV.JCPO COWS COMPUTES 




Get the most out of Profile* 2 and 
Profile Plus* databases with 

Trans Pro "ffi 80 * 

File Transfer Utility 1 2, or 1 6 



® Move data from one Profile data 
base to another without costly 
re typing 

• Add, delete, combine, or rearrange 
fields without scrambling data 

• Insert literal values into speci 
tied fields 

• Blank out specified fields 



Compatible with TRSDOS* 2.0 
or Hard Disk TRSDOS 



I includes 8" disk, manual, 
¥ sample data files 

CHECK, MO , VISA, MASTERCHARGE 



SOFTWARE *- -' TO SPAN THE GAP 

355 Government, Roanoke, AL 36274 
Phone (205) 863-4006 

•TRS-SOand TRSDOS are trademarks of Tandy Corp. 
Profile 1 1 and Profile Plus are trademarks of The Small 
Computer Company, Inc., licensed to Tandy Corp. 



NEW LOWER PRICES 



PRINTER 

MAKE, MODEL'NUMBER 

Contact us If your printer 

is not listed. We have ribbons 

FOR MOST PRINTERS 



NEW REPLACEMENT 

CARTRIDGES 

Price each In 

quantity of 
3 6 12 



ANADEX 9500 


12.00 


11.50 


11.00 


CENTRONICS 704 (7-MEG) 


7.50 


7.25 


6.75 


C.ITOH Prpwriter 


8.75 


8.50 


8.00 


C.ITOH Starwriter 


5.50 


5.25 


4.75 


COMMODORE PET 8023P 


9.00 


8.75 


8.00 


EPSON MX70/MX80 


5.50 


5.25 


5.00 


EPSON MX100 


11.00 


10.50 


10.00 


IDS Paper Tiger 460/560 


7.75 


7.50 


7.00 


NEC 5500/7700 Nylon 


6.00 


5.75 


5.25 


Multistrike 


5.50 


5.25 


4.75 


Multistrike High Yield 


6.00 


5.75 


5.25 


OKIDATA Microline 84 


6.00 


5.75 


5.25 


80, 82, 83, 92, 93 


3.00 


2.75 


2.25 


QUME Nylon 


5.25 


5.00 


4.50 


QUME Multistrike 


5.00 


4.75 


4.25 


RADIO SHACK DW II 

Carbon Film - Black 


6.25 


6.00 


5.50 


RADIO SHACK LP l-ll-IV 


3.50 


3.25 


3.00 


RADIO SHACK LP 1 11- V 


6.25 


6.00 


5.50 


RADIO SHACK LP VI-VIII 


6.50 


6.25 


5.75 



CHECK- MO- COD 



LkA""^ 



All orders shipped U.S. mail. FREE 

shipping on prepaid ordersfor USA zip codes. 
VISA/MC add $1.50 (include exp. date). 
COD add $3.00. Foreign must be US funds 
add $3.00 surface, $6.00 air. Ph 6 pm - 9 pm 
EST Mon - Fri & 9 am - 5 pm Sat. 

ADEL COMPUTER MART (302) 492-8463 

Dept. 40 Box 195 • Hartly, DE 19953 
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NEWBASIC 2.0 



Adds over 40 commands to 
Model I/SIS disk BASIC. 

• Customize NEWBASIC-include 
only those commands you need. 

• Over a dozen easy-to-use and 
powerful graphics commands 

(eg, DRAW, LINE, CIRCLE, PAINT). 

• Produce sound for music & effects. 

• Pre-defined and definable keys. 

• Disk-based spooler/ despooler. 

• Execute strings, label lines, 2-byte 
PEEK/ POKE, restore to any DATA 
line, block memory move, set 
hi-mem, and much, much more. 

• 70 page manual & summary card. 

• Only $39.95! (+ $2.50 shipping) 

Check, money order, VISA, M/C, and CO.D. 
(+ $2) accepted. CA residents add 6% tax. 
Foreign orders (exc. Canada), $5 shipping, 
US funds only. Both Model I & III versions' on 
same disk. Requires 48K & 2 disk drives. 
(Not copy protected— personal backups OK.) 
Works with most major DOS's. 



Modular 
Software 
Associates 



209 18th Street 

Huntington Beach, CA 92648 



Credit card & CO.D. orders accepted 24-hrs 
(manned 8-5, M-F): (714) 960-6668. 

Dealer inquiries invited. 




CREATE: forms, labels and form letters. 



This machine code word processor can 
even ADD/SUBTRACT bookkeeping columns. 

Change, delete, add, insert, move, copy 
(characters/lines/blocks) of text fast. 

SELECT: margins, page length, number of 
copies, tabs, center lines / page, line 
spacing and LEGAL PAPER LINE NUMBERING. 

MODEL I users get: Model III shift key| 
controlled upper / lower case letters!. 

EASIER to USE than other systems. Only! 
8 keys control 96% of the LW features!! 

TRY a LW for 3 MONTHS. If not satisf- 
ied return it. We will refund all but 
S3. 50 to cover postage / handling. IF 
YOU CAN NOT RETURN IT, DO NOT BUY IT. 

C. A. of N. Y. rates his LW purchase as 
"one of the best buys I have made. "! 



TAPE 16K Model I/III systems $23.99 
DISK 32K Model I/III systems $37 99 



WE PAY:^t ax / US postage on ALL_orders . 

specials; 



Verbatim MD525 01 disks: 10 for S25.95 
Microsette CIO tape+box: 20 for $13.95 



5905 Stone Hill Dr. 
Rccklin, CA 95677 
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(916) 624-37091 
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of graphics characters. A couple of 
drawbacks are worth mentioning here. 
There is only one shift key on the right 
side of the keyboard. The one ordinarily 
found on the left side of a standard 
keyboard was replaced with the control 
key. Also, the spacebar is tucked neatly 
out of the way. It's almost impossible to 
depress using the familiar thumb-on- 
spacebar technique! 

The MC-10 is expandable to 20K of 
RAM for an additional $49.95. The basic 
machine contains only 4K, but actual 
memory available on power-up is only 
3142 bytes. The additional RAM can be 
plugged into a memory expansion port at 
the rear of the keyboard, much like that 
of the Timex/Sinclair. I tried to obtain 
the extra memory for this review, but the 
local Radio Shack stores didn't have it in 
stock and they weren't able to give me a 
delivery date. 

MC stands for Micro Color, and micro 
color it is. The entire instruction set is 
only a subset of that in the Color 
Computer. There are many powerful 
commands, such as PEEK and POKE, 
SET and RESET; MID$, RIGHT$ and 
LEFT$ for string handling, etc.; but 
you'll find no high-resolution graphics 
commands. The MC-10 does not have 
high-resolution color graphics 
capability. 

The MC-10 contains a 6803 micro- 
processor which is an earlier version of 
MPU in the 6800 series of microproces- 
sors available from Motorola. Currently, 
there isn't much software available for 
this machine. There has been quite a bit 
of software written for the 6800 series of 
microprocessors, but most of it is in 
machine language. You won't be able to 
use any of it, however, because the 
version of BASIC (Micro Color BASIC by 
Microsoft) doesn't allow you to load or 
save machine language programs. It 
looks like serious programming for the 
MC-10 is out of the question. 

Machine language programs can be 
written in BASIC using line packing, 
string packing, or dumped into the form 
of DATA statements, but the manual 
does not provide a memory map or other 
necessary technical material. It looks 
like the hackers may have some fun with 
this machine. 

The MC-10 contains no joystick ports, 
so serious gaming is out of the question. 
There's no expansion port except for the 
one for memory. After-market people 
may be able to use it for future add-on 
capability. You won't be able to make use 
of Color Computer program cartridges 
since there's no slot provided for them. 
The MC-10 does have an RS-232 serial 
port which will enable you to use a 
number of serial printers, plotter/ 
printers, or plotters. Radio Shack claims 



that telecommunication is possible with 
the correct terminal program installed. 
You should be able to easily connect a 
modem to the system, but how does one 
install a terminal program? These must 
be written in machine language for 
reliable communication at speeds over 
110 baud, but, as mentioned earlier, 
there's no command which will allow you 
to load a machine language program! 

Programs may be saved using most 
standard cassette recorders, but 
programs saved using the TRS-80 Color 
Computer are not readable by the MC-10. 
Programs written for the TRS-80 Color 
Computer may be compatible but, more 
than likely, you'll have to perform your 
own conversions and type them in. 

One annoying short-coming of the MC- 
10 is that you must manually control the 
cassette recorder during cassette I/O 
operations (CSAVES and CLOADS). 
The CSAVE and CLOAD commands do 
not turn the cassette recorder off and on 
automatically. At first, I took this to be a 
flaw with the machine, but discovered 
later that this feature was simply left out. 
It appears that the lack of automated, 
software controlled, cassette I/O is going 
to present some problems when writing 
programs that require successive, 
cassette read/write operations. 

The operator's manual is very well 
written and will get you up and running 
in very short order. There are many 
programming illustrations that demon- 
strate use of each command that is 
available with the MC-10. It will be 
beneficial for the first-time user. 

The MC-10 seems to be directed toward 
individuals who are entering the micro- 
computer arena for the first time. You 
can use the machine to learn elementary 
programming techniques and 
familiarize yourself with some of the 
hardware. But the lack of expansion 
capability makes your education incom- 
plete. In the event you decide that 
computing isn't your forte, you will not 
have invested a large sum of money for 
the experience. At $119.95, the MC-10 is 
overpriced, and I expect to see the price 
drop dramatically in the near future, 
especially in light of the recent $39.95 
price tag on the Timex/Sinclair at some 
department stores. 

Don Scarberry 



TRSDUM and TRSTUM 
Tape Reproduction Utilities 
CRB Microtools 
14835 North First Ave. 
Phoenix, AZ 85023 
(602) 993-3999 

$16.95 tape sys. + $1 postage 
$17.95 disk sys. + $1 postage 



NEW CATALOG OF 

PROGRAMS FOR THE 

TRS-80 Model l/lll 

□ Many New Programs 

□ Quality User-Tested 

a Excellent Documentation 
a Tape/Disk Compatibility 

□ Emphasis on Usefulness 

□ Menu Driven User Friendly 

□ Low Hobbiest Prices 

□ Money Back Guarantee 

Send $1 for catalog which includes 
$2 discount coupon to: 

Practical Programs 

1104 Aspen Drive 
Toms River, NJ 08753 



CONVERT-A-DISK 

Single-sided disk drive users 
increase your disk storage by 
100%!!! 

Convert-A-Disk will work with 
any 5 1 /4-in. single-sided disk drive 
no matter what type of computer 
you are using. 

Why pay hundreds of dollars to 
increase your disk storage?? 
Convert-A-Disk will allow you to 
convert all your existing disks to 
give you a 100% increase disk 
storage capacity. 

Send $15 check or money order 
to: 

CONVERT-A-DISK 

P.O. Box 15277 
Portland, OR 97214 



Computer-Assisted 
investment Handbook 

by Albert I. A. Bookbinder, Ph.D. 
Professor, City University of N.Y. 

New 220 page book has 50 pro- 
grams for Stocks, Bonds, Options, 
Futures and Foreign Exchange. 
Also on disks for APPLE, TRS-80 and 
IBM-PC. 

To order book: send name, 
address and $19.95 to: 

PROGRAMMED PRESS 
2301 Baylis Ave. 
Elmont, NY 11003 

(NY. residents add sales tax) 




THE ONIQCJE PERSONAL COMPUTER 
PROGRAM FOR COIN COLLECTORS 

o Tha program that makes cataloging 
your U.S. coin collection a snap! 

o Data file with latest Market Value for 
all grades of most coins supplied on 
program disk. 

s Quarterly Market Value updates available. 

« Multiple printed reports give Inventory 
Value - Profit & Loss - Tax / Insurance 
Information. 

o Concise Users Manual included. 

. Available for 48K TRS-80 I/IH 
84K IBM-PC. 

» Write for free brochure or order now 



Price - $95 (Calif, residents add 6% Sales Tax) 
plus $1.50 to cover postage and shipping 
COMPCI-QUOTE Telephone 2 13/348 3662 ' 

6914 Berquist Ave. D8pU80 Canoga Park, CA 91307 



MODEL II/III/4 

CUSTODIAN 

A custodial inventory system. Ideal 
for insurance/property accountability 
uses. 
BUDGET MONITOR 

Tracks budgets and expenses by 
user-defined categories. For home, 
or project applications. 
DEMOPAK 

A smorgasboard of over 30 programs 
for personal/leisure use including 
games, personal finance, and math/ 
stat. 

MODEL III/4-$25 MODEL H-$40 

SEND CHECK OR MONEY ORDER TO: 

SOUTHFORK SOFTWARE, INC. 

68 Fairlake Drive 

Hattiesburg, MS 39401 

Specify TRSDOS Version with Order 
WRITE FOR CA TALOG 



* BOOKKEEPER * 
$34.50 

Perfect for small business. TIME 
DOME has pre-loaded files. 

* SCRIPSiT — MAILER* 
$34.50 

Form letters, envelopes, labels 
from address list and letter made 
by SCRIPSIT. 

* SERVICE BILLING * 
$34.50 

Rate chart, serial number, from- 
to-date. 

(714) 774-9383 

H.A.K. WORKSHOP 

9791 Orange 

Anaheim, Cal. 92804 



1 ALL 



. ALLOWS UNLIMITED 
§ COPIES OF MOST 
1 RADIO SHACK 

PROGRAMS 

INCLUDING 

SCRIPSIT AND 

VISICALC 

Comes on a disk 



No Programming 

Experience 

Necessary 



ONLY 
$15.00 




HUTCHINSON, KANSAS 67501 



FILEQUEST— Do mailing labels, small 
inventories. Tape or disk $15.00. 

CALENDAR— An electronic 
appointment book. Printer output. 
Only for 32K RS disk $10.00. 

M0NEYPLANNER- See how much 
you have to save for the future. $7.00. 

T0RRS INVASION- Board game. 100 
square grid. User supplies board and 
pieces. Earn credits to build your 
units. Up to 26 pieces. Three levels of 
play. User can define pieces. Can you 
beat the computer? $10.00. 

DATA MANIA, INC. 

51625 Chestnut Road 
Granger, IN 46530 

Add $1.50 P/H. Specify your system, 16K or 32K 
and TRS-80 E/B or Model l/lll. Write for software 
list. 



SECUR-IT 




Secur-It Disk File storage containers offer 
safe, no-spill portability and secure, orderly 
storage for your diskettes. 50 diskette ca- 
pacity. Walnut wood grain or black for 5'A" 
or 8" diskettes. 5'A" files, $29.95 ea., 8" files, 
$39.95 ea. Specify color & size. 
Model I/Ill Software 

• Send For Free Catalog 

® For Fastest Service Send Money Order Or 

Certified Check ® Add $2.00 Shipping 

Charge Per Order 9 Calif. Residents 

Add 6'/2% Sales Tax • All Merchandise 

Shipped From Stock • 



REM Industries, Inc. 



(213)341-3719 



August, 1983 95 



SPANISH DRILL AND PRACTICE 

An 18 program set of intensive drill and 
practice for first aid and second year 
Spanish students. On cassettes for TRS- 
80 Model I or III. Complete set is $49.95 
and consists of Verbs, Vocabulary, 
Grammer Usage, and Reading. 

ALPHA— Preschool Alphabet Recognition 
ALPHA II— More Alphabet exercises 
SIGMA— Addition for Grades 1-3 
SIGMA— EX- Addition for Younger or 
Slower Learners 

SIGMA-82— Addition, Subtraction, 
Multiplication, and Division with 9 Speed 
Levels 

Learning To Count Money- Step- 
By -Step Instruction and Drill 

Available on cassette only for TRS-80 

Model I or III 

Each program $6.95, two for $12.00, four 

for $21.00 

Learning to Count Money $19.95 

Add $1.00 to total order for First Class 
Shipment 

Mercer Systems inc. 

87 Scooter Lane 
HlcliSwISSe, NY 11801 



This is an 

IBM ELECTRONIC 50 

PRINTER! 

(lucky thing) 



it used to be only 
| a typewriter 

!Your IBM Electronic type- 
writer can also be a printer. And 
your computer can do word 
processing copy that looks as 
| if it were printed on the paper 
! instead of sprinkled on. 
1 Any computer with a Cen 
j tronics printer port can do the 
| job elegantly with an interface 
i from Cybertext — the company 
I that does the microCOMPOSER 
I typesetting systems. 
| The nice price? Only $275.00 
I Installation is child's play. Try 
| it for ten days. Return for a re- 
| fund if not satisfied. 

Check, Visa/Mastercharge or 
COD. Order by mail or phone. 

C_ Cybertext Corporation 
Box 860 Areata. CA 95521 
707-822-7079 

Basic Computing 




feviews 



If you're like me, you initially bought a 
TRS-80 cassette-based system (in my 
case, a Model III) because you couldn't 
afford a disk system at the time. Then, 
you gradually started buying software 
on tape: arcade games, utilities, word 
processors, and so on. Along the way, 
you couldn't help but notice how much 
more software (electronic spreadsheets 
such as VisiCalc, word processing 
programs with proportional spacing and 
special print codes and controls, etc.) was 
available if you had disk drives. Even- 
tually, this led you to upgrade. But what 
about all the tapes you bought before the 
changeover? 

For BASIC programs, no problem. You 
just CLOAD and then SAVE the 
programs to disk. But most of your 
programs, due to the relative slowness of 
BASIC, are probably written in machine 
language. These system programs, more- 
over, most often use memory addresses 
which overlap with TRSDOS. Attempts 
at executing such programs from disk 
result in a "crash" in which, at best, 
TRSDOS reboots itself. What a pity to 
have a disk system and not be able to use 
it with all those taped programs! 

Enter CRB Microtools, with its utilities 
designed to handle precisely such 
problems as this one. You simply load 
TRSDUM in the manner of any other 
system program. You are given a menu. 
Selecting the key that loads a tape into 
RAM, you press the key to offset ad- 
dresses upon the return to the menu. This 
may be done automatically, or you may 
stipulate where you want the addresses 
to begin. According to the manual, the 
automatic default works in 99% of the 
cases. 

There are operating systems such as 
Newdos which do contain an offset 
utility (called LMOFFSET), but frankly, 
I had no wish to spend over $100 and also 
learn a new (and reportedly, huge) 
operating system, having barely 
explored TRSDOS. So, when I saw the 
magazine ad, I gave the author a call. I 
found him very helpful and willing to 
explain his utility, after which I ordered 
and received it promptly. The first thing 
that I did was to make a working copy 
of TRSDUM (actually called 
TRSDUM3/CMD, the version appro- 
priate for the disk-based Model III). I 
proceeded to use that to copy my cassette 
Scripsit 1.0. 

What a pleasure to be able to write a 
letter without having to use tape! But 
that was just the beginning. Next came 
my collection of arcade games from Ad- 
venture International, Big Five, Soft 
Sector Marketing and others. This utility 
for offsetting memory addresses alone is 
certainly worth the asking price. I would 
have been willing to pay more. 



There are other features, such as ones 
that display the length of any file, make 
high-speed tape archives of your disks, 
key select baud rate, unoffset any load 
offset, and others. The tape versions for 
the Models I and III are respectively 
called TRSTUM1 and TRSTUM3. The 
disk versions are called TRSDUM1 and 
TRSDUM3. 

The manual is well written, clear, and 
free of sloppy spelling and grammar. The 
utility is quite easy to use. At this price, 
this program is a super value and a real 
winner. 

Dr. Michael W. Ecker 



Cermetek 2 12 A Modem 
Cermetek Microelectronics, Inc. 
1308 Borregas Ave. 
Sunnyvale, CA 94086 
(408) 734-8150 
$595 

Low-cost 300/1200-baud modems are 
beginning to make their appearance, and 
the Cermetek 212A is one of the early 
leaders in the race for microcomputerist 
acceptance. Having worked with the 
relatively slow 300-baud modems, we 
were anxious to evaluate a 1200-baud 
modem to see if it offered any real 
advantages over its slower counter- 
parts. We were pleasantly surprised to 
find that the Cermetek was very user- 
friendly and that it is very versatile. 

It is attractively packaged in a black, 
satin -finish metal case. It measures 8% X 
liy 2 XI Vi inches and weighs a mere four 
pounds. It has a sleek, low-profile look to 
it. Eight L.E.D. status indicators and six 
rocker switches are included on the front 
panel. The power supply is externally 
housed in an AC/DC module that plugs 
into a three-prong 11 7- volt AC wall 
outlet. It supplies power to the unit via a 
keyed connector that mates to a 
connector on the back of the unit. The 
phone line cable and the standard RS- 
232 jack for connection to the data 
terminal equipment are also included in 
the rear of the unit. The telephone 
connection cable is 7 feet long and 
terminates with a modular phone plug. 
The unit was quite easy to operate and 
required very little in the way of setup. 
The RS-232 cable from the TRS-80 is 
plugged into the rear RS-232 jack and the 
telephone cable is plugged into the 
supplied adapter in order to plug two 
devices into one phone connection. The 
modem may be operated with or without 
a telephone attached. It has the ability to 
dial the telephone number while under 
software control. The power supply is 
attached to the Molex connector in the 
rear and then plugged into a standard 



Delta Graphics Basic 

Programme to expand graphics capability of 
TRS-80 Model I & III (Min: 16K level 2, cassette). 



1 Fast powerful easy to use 

■ For beginner and expert programmer 

■ Design games and graphics displays in a flash 
• Written in compact Z-80 machine language 

ONLY 



:luded — send cheque or money order lo: 

DELTA MICRO 




SUPER — P/R PAYROLL 

Power and flexibility for all your payroll needs . . from 
5-employees to an accounting firm with 30 payrolls. 

SAMPLING OF FEATURES 

• Machine language sorts. 

• Multiple state tax withholding. 

• Departmental payroll journale. 

• Report generator for non-standard 
reports. 

• 14 User Defined Earninga/Deduetion 
Categories With Employee Base 
Rates. 

• Works with all DOSES. 

• Date file conversion for Radio Shack 
Disk Payroll [86-1556] users. 

a 150-page comprehensive User's 
Manual. 

Complete System $225 Credit 

Manual With Demo System $55 $45* 

Manual Only $35 $35* 

•Credit allowed when Complete System is purchased in the future 
Users say SUPER-P/R is simply the best. 
If you don't agree, return the Complete System with- 
in 60 days for a full refund (less $25 Eval. Charge.) 

MICROCOMPUTER APPLICATIONS 

348E IVIock Oranga Court South 

Satem, Oregon 9730S 

[BD3] 3B4-1Q90 

Write or leave message for free brochure or addi- 
tional details Specify Model I, Model III, or Model 4. 



Transfers printers, terminals and 

other devices. Model 80-D716 in- 
stantly transfers parallel devices — 
without risk of damage that can result 
when cables are manually unplugged. 
Contacts are gold plated for minimum 
resistance, automatic cleaning and 
optimum performance. Switch posi- 
tion indicates correct channel selec- 
tion. Beige cabinet, 2" high. $1 1 4.95 
plus shipping. 




31 9 Louella Ave, Wayne, PA 1 9087 
215-964-9404 





ABC Data Products 




■RS-80IVSODELi T ' M - 

GOLDPLUG-80 

Eliminate disk re-boots and data 
loss due to poor contact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU/keyboard to 

expansion interface $18.95 

Expansion interface to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95 ea 

Full set, six connectors. . . $54.95 



VISA 



EAP COMPANY 

P.O. Box 14, Keller, TX 76248 

(817)498-4242 

*TRS-80 is a trademark of 

Tandy Corp. 




For Model's I & ill 



POSTAGE X IIANULlilO AdO >2 . Of) PER ORDER 
NO COD ORDERS PLEASE ALLOW ?! DAYS FOR 
DEI IVERY ON PERSONAL ( MEEK ORDERS 



f#WMMWW»M 



P.O.Box 39093 

NORTHBRIDGE StA. 

Charleston, S.C. 29407 
I (803) 552-9990 






TIRED OF "SPACE" GAMES? TRY 

SPECIAL 

Oscar Draft mis p s il°o n t 

There's plenty to shoot at; bombing, strafing, 

dogfighting But the real fun is navigation. Using 2 

ADF/DME instruments You must find targets and 

return home base Based on real navigation 

Instrument panel, runway, fighters, etc, all in 

graphics 

32K Disk Model I & III 

BUT THAT'S NOT ALL! 

This is 1 of 9 programs in a S1 75 package You also 

get Wizard's City (adventure game), income tax, 

financial statement, mail list, bus mileage, tax file, 

income/expense, and stock charting 2 super 

games and 7 personals! 

YOU GET THE ENTIRE *Z1 vo 

$175 PACKAGE FOR add $1.50 

SHIPPING 
Attention tape users! Order disk and have it 
copied. How can you lose at $2.44/program? 



SOFTWARE 



601 1 SAN FELIPE 
HOUSTON, TX 77057 



type 
SSSD/soft 
SSDD/saft 

DSDD/soft 
far Nod II 



1 hose 2* fan 
21.35 28. 95 



8" for jorf IE 5S.3S St 



W1WH §P»W §B§ I 

WLTID05 

Z DOS 35.95 

E BASIC 2E.9S 

tOBERIPT 7.8 33.95 

TIMSIiWt/disK 31.95 

SEGILIffl* NORM 13. 58/ tape IS.SS/dlisX 

ffiflP/DOTWITEM 1.5 OT.S5 
FOOT DISKS 1.2.3.H ea 2S.3S 



C.I+oh PRMHTER 1 (parallel) t79.BB 

PMUTER 2 ( para lief ) 679.88 
Printer cable ( I/III or II) 31.95 

. - • TO Ba.SBi 

Add MJ Sales Tax if applicable. 
Shipping (48 States) $2.50 per order. 



14 Station five. Madden Hts. NJ B8305 
Ohec&s tit cdeh. Ho crviftt cdrds. 
Pwrchdee orders add IBX -to p\r tees. 
Mr tie for cd-tdlog/tuBMeiet-ter' 



BftRCLPiV ILIHVTE 

n. C3 c! n r" 1 1 rrrc c 

UJDRDPRDCI-lll 
UEfiSOl 3-D 

Basic plus machino language Word Proco&sor 

TRS-80" Model l/lll 48K Disc 




control codes in your tc 

Superscript Subscr5pt 



Underline 



Italics More "^"^ 



'**■* 



$14-95 each, with disc " 8 °** 
S1Q-95 each, documentation only 

EftRCLRV UJHVTE ASSDCifiTES 

P.O. Box 948, 

New Westminster 

B.C. Canada. V3L 5C3. 

Add S?-00 for postage 

B.C. Residents add tax at 6* 

'Trade mark of Tandy Corporation 

' 'Trade mark of Epson America 
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wall outlet. The terminal program is then 
loaded, whereby the TR indicator lights 
up, signaling terminal ready. 

The modem speed is next selected by 
the position of the switch marked "HS" 
for high speed. The phone number is 
entered by telling the modem that you 
wish to dial by entering two line feed- 
carriage return pairs in a row. The 
modem responds with a message on the 
screen asking, "DIAL: WHAT NUM- 
BER? ..." The number is entered, for 
example: 9:8029435567 (carriage return). 
The ":" indicates a dialing pauseto allow 
dialing through a PBX system. As soon 
as the carriage return is sent, the modem 
responds with "DIALING," then pauses 
for two seconds to allow the local central 
office to return a dial tone. After this, it 
begins to pulse dial each digit with each 
one displayed on the screen. 

After the entire number has been 
dialed, the modem sends a "DIALING 
DONE, WAITING FOR ANSWER 
TONE." When the modem link is 
established, it sends "MODEM 
ANSWER TONE, RECEIVED DATA 
MODE." If, after 17 seconds, the called 
modem does not answer, the call 
sequence is disconnected and the modem 
sends "NO MODEM ANSWER TONE 
RECEIVED, TRY AGAIN." To redial, 
simply enter two carriage returns, and 
then a third when the prompt appears. 
To abort dialing, simply enter two 
carriage returns and the letter "Q." it will 
respond with the word "BYE." Pretty 
smart little guy, huh? 

The Cermetek is bilingual, meaning it 
will speak two languages. The first is the 
Bell 103/113 standard at 300 baud, and 
the second is the Bell 212A standard at 
1200 baud. It has the ability to 
automatically sense which type of data is 
being received while in the auto-answer 



Do you throw away your car 

when it's out of gasoline? 
Then why throw away your 
printer cartridge when it's 
out of ink? 

We can show you how to 
reink your EPSON* ribbon 
cartridges, or other popular 
brands, with only a few cents 
worth of special ink. 
Write today for free lists 
telling us your printer make 
and model. A postcard will 
do. Information available by 
mail only. 

ZYGOTRON 

P.O. Box 27 

Fremont, Mi 49412 

'EPSON trademark Epson America, Inc. 



mode. If the HS switch is set to high 
speed, the modem will shift down to 300 
baud if the carrier tone detected is at 300 
baud. This gives tremendous flexibility 
for an application such as a 300/1200 
baud bulletin board, where the majority 
of callers will be using the slower speed, 
but those having 1200 capability can 
also be accommodated. 

In addition to the front panel switches, 
there are also 23 other options that are 
DIP switch selectable inside the unit, 
making the 212A very flexible. The front 
panel switches, besides the HS switch, 
are: AL (analog loopback), which 
connects output of transmitter to input of 
receiver; DL (digital loopback), connects 
output of receiver to input of transmitter; 
ST (self-test), connects internal 
generator for self-testing; RDL (remote 
digital loopback), commands remote 
modem to assume digital loop test mode; 
DATA (voice to data), commands the 
modem to enter the data mode. You'll 
notice the lack of a power switch, a minor 
irritation. The indicator lamps are MB 
(make busy), TR (terminal ready), MR 
(modem ready), SD (send data), RD 
(receive data), H (high speed), MC 
(modem check), and TM (test mode). 

The modem was tested on two local 
mainframe computers. The unit worked 
without a single dropout over several 
days of testing. The increase in speed at 
1200 baud was tremendous. Instead of a 
line taking several seconds to display, it 
is almost instantaneous. The pulse dialer 
worked well under all conditions and the 
entire unit performed very reliably. The 
documentation was excellent and the 
total impression was very favorable. The 
Cermetek 212A is certainly to be 
considered if one is contemplating a 
move to 1200 baud. 

Jim Klaproth 



DETACHED KEYBOARD CASE 

'"' LNWs 




GETS FAN NOISE AWAY FROM YOU 
GIVES YOU MORE DESK SPACE 
POLANE CATALIZED TEXTURED FINISH 
STANDARD COLOR IS GRAY/WHITE 
USES ALL MACHINE SCREWS & STUDS 
STRAIN RELIEF FOR CABLE 
539 50 < S2 50 SHIPPING 
WA RESIDENTS ADD 8% TAX 




EDUKIT COMPANY 
23215 94TH SOUTH 
KENT WA 98031 



Accounts Receivable 

Holman D-P Service 

2059 West Lincoln 

Oroville, CA 95965 

(916) 533-5992 

Models I/III with two disks 

$149.95 

This accounts receivable program has 
been in use here at 80-NW Publishing, 
Inc. for over ten months. The program is 
written in BASIC and runs under 
TRSDOS. It is a large-capacity system 
that will let you expand your information 
over, if needed, 31 data disks. Thousands 
of account numbers are possible and you 
can have up to 99 sub-accounts to a 
master account. The system also gives 
different options for interest rates, 
customer status codes, transaction codes 
and more. 

I was amazed by the number of 
different possibilities it offered. All this 
is backed up by thorough documen- 
tation. The manual has 26 pages plus 
sample printouts and is written more like 
a learning manual than an operator's 
manual. It will lead you step-by-step 
through the entire monthly cycle. For 
later references there is a very detailed 
table of contents. I found it very easy to 
understand and no questions went 
unanswered. 

You may print out an audit report 
before posting and get reports with 
percentage of credit limit, date of last 
payment, sales analysis, 30-60-90 day 
aged statements with date, invoice 
number and description. My only 
objection is that there is no sorting of 
accounts and it is difficult to locate 
information if you do not have the 
account number. A separate utility that 
would alphabetically sort all the 
accounts would be extremely helpful. 
The program is easy to operate and 

LABGlCAPAaTYSYSTEIiLAItCSE 
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3 ACCOUNTS RECEIVABLE jj 

1 5000+ ACCOUNTS £ 

H 30-60-90 DAYS AGED STATEMENTS SHOW 3 

(ft DATE/INV#/DESCRIP/AMT (WITH AGEING) ™ 

> SELECTIVE FINANCE CHARGES & RATES S 

m FAST ENTRY, POSTING W/AUDIT REPORT, T 

5* SUB-ACCTS, % OF CREDIT LIMIT, DATE OF > 

H LAST PAYMENT, SALES ANALYSIS ^ 

® 

2 GENERAL LEDGER o 

«* 400+ ACCOUNTS t 

<•> +REPORT FLEXIBILITY/CAPACITY > 

"■ +DEPARTMENT P&L (UP TO 9) O 

g +UNLIMITED ACCOUNT CATEGORIES 5 

K +STATEMENTOFCHANGES (ASSETS ONLY) "J 

< +PERCENT P&L < 

j m 

1 1 49.95 Each * Both for 1 99.95 g 
B HOLMAN D-P SERVICE 4 

W 2059 WEST LINCOLN 3.00 S&H ip 

>■ OROVILLE, CA 95965 VISAORMC* 

j» 916-533-5992 COD C 

C manual $30.00 test set $50 00 33 
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>S7 10 GAMES -ONE PACKAGE °%, 
'/ -on onz caA^et-te- 

Requires 16K RAM-up. ONLY $10.95 



Shooting Gallery 


Purple Puma 


Needles in the Hay 


Concentrate 


Math Smarts 


Word Works 


Dodge It 


Space Races 


Hop Along Cass-80 


X ' s and ' s 



Disk Version $14,95 
Look $ol second pa.cka.gz ioon! 

Please include $1.50 for S/H. 
SEND CHECK OR MONEY ORDER TO: 

MR. SOFTY 

1416 Ridgmood, Lakzuiood, Ohio 44107 
L OHIO RESIDENTS ADD 64% SALES TAX -J 





NODVILL "^ 
DIET 
PROGRAM 

$69.95 



"TAKE A BYTE",, 

MAINTAIN, LOSE OR GAIN WEIGHT (°l 

With your TRS-80 Double Density Disk Model I/III/4 

and 

The NODVILL DIET PROGRAM "Take a Byte" 

you can quickly and accurately: 

* Calculate caloric and nutritive tood Intake 

* Evaluate nutritive value of your diet 

* Compare daily diet to Individual RDA Chart 

* Create personalized dally meals and menus 

* Plan varied daily menus based on sound nutrition 

* Save records of daily meals and menus for future planning 

* Print nutrition charts, food, meal, menu and grocery lists 

"Take a Byte" is a Modular BASIC Program 
MAIN Program Menu 

(1 ) Recommended Daily Dietary Allowance (RDA) CHART 

(2) 733 Expandable Random Access FOOD LIST Data File 

(3) 28 Nutritional MEAL LIST Data File Examples 

(4) 7 Balanced DAILY MENU LIST Data File Examples 

(5) GROCERY LIST Program Module 

(6) 25 Page USER'S MANUAL including Charts and Tables 






Color Computer 
Secrets Revealed 

Learn all about the secret inner workings of your 
Color Computer This new book tells you how to: 

■ Make back-up copies of machine language 
programs 

m Merge two or more BASIC programs 

■ Increase your memory for free 

■ Upgrade your Color Computer to 16K, 32K or 
64K RAM and add Extended BASIC 

u Run your computer at twice normal speed 

■ Use a myriad of PEEK and POKE statements 

and much, much more 
All this in an easy-to-read and profusely illus- 
trated book A must for every Color Computer 
owner - just $11.95 + $2 shipping Order direct 
from: 




THE JOYSTICK INTERFACE 




USE THE JOYSTICK YOU HAVE 



Simply plug your joystick in 
JOYSTICK INTERFACE, and plug i 
Model I or Expansion Inter-face 



ONLY S24. «5>S 

FPEE SHIPPING 



ATARI (TM) 

JOYSTICK 

S6.50 



a Exchangi 
441 18 
esi dents add 6.23V. sales tax. 



The So-F-fcw 
1613 Compton Road 
Cleveland Hts. , Oh 



/ai lable 



Dealers 



LIMITED OFFER 

NEWDOS - 80 ver. 2.0 
and DOSPLUS ver. 3.4 

A combined regular price of 
$299.96 



Now $149.00 co ^ ed 

or call for separate pricing. Offer 
subject to cancellation without 
notice. 

CALL TOLL FREE 
800-835-0071 



A. !-• JE S 





526 E. 4th 
HUTCHINSON, KANSAS 67501 



The House- Ware Genies 

* The Mail Genie 

* The Pantry Genie 

* The Recipe Genie 

* The Calendar Genie 

* The Insurance Genie 



At last, the Turn-Key Programs that 
allow Dad to influence Mom, that a 
TRS™-80 Model III and Color Com- 
puter is a modern day necessity. 

Intr ptr y $29.95 



Developed By 
SOUTHERN CENTER 
FOR RESEARCH & INNOVATION 
P.O. Box 1713 
Hatticsburg, MS 39403 
TELEPHONE 601-545-1680 
TELEX 585400 SCRI US HATI 
CABLE SCRI US 

Dealer Inquiries Invited 



J8t*)*t*>fc*>*t*>«c>#t*8c**>Sc*1t**»t>S*** 



X)t!{t3«J8tlCt*t>tcl« 



SCRNWRTR 




$ 24.95 



SCREEN WRITER IS A UTILITY PROGRAM USED 
TO DESIGN AND SAVE CUSTOM SCREENS FOR 
FUTURE USE IN YOUR BASIC PROGRAMS 



MAIL 



$40.00 



STORE UP TO 2000 NAMES ON ONE DD DATA 
DISK. 1 TO 4 LABELS ACROSS. FAST SORT ON 
ALL FIELDS. USER FRIENDLY MENU OPERATION 



COMM1NG 


SOON 


CASH REGISTER 




$ CALL 


Fob Model's l& 111 



POSTAGE t. HANDLING ADD $2.00 PER ORDER 
NO COD ORDERS PLEASE ALLOW 21 DAYS FOR 
DELIVERY ON PERSONAL CHECK ORDERS. 



P.O.Box 39093 

NOBTHBRIDGI StA. 

Charleston, S.C. 29407 
(803) 552-9990 



*3»**C*«t>8t«**!8t«t**=!«****** I * { * 



business softw^ 
directory 



Micro Architect, Inc. 
96 Dothan St., Arlingt 

MA 02174 



on, 



1EEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability to 
TRS-80 Model 1, 3 or 4, Level 2 or DOS 
with a minimum of 16K. 









mm 



48880C 

For Model 3 or 4 
Operation 488-80 B 

For Model 1 
Operation 



K» 



■lib 




Model 488-80B or 488-80C Price: $375 

+ shipping, insurance & tax 
WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING 

LABORATORIES 

11 Neil Drive • Old Bethpage, NY 11804 

Telephone: (516) 694-3370 

'Trademark of Tandy Corp. 
There is no affiliation between Scientific 
Engineering Laboratories and Tandy Corp. or 
Radio Shack. 
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runs smoothly. It is a stand-alone 
program and is not interactive with other 
accounting routines. There have been no 
problems and that is quite amazing since 
I managed to destroy several other A/R 
programs before discovering this one. I 
have tried to find flaws by pressing the 
wrong keys, inserting the wrong disk, 
entering information for non-existing 
accounts, and so on. The list of my 
mistakes is endless, but so far the system 
has caught all of them and told me "You 
can't do that!" 

I believe in this program and find it to 
be excellent. Comparing the cost to other 
A/R programs makes it even more 
attractive. We recently received the 
General Ledger program from Holman 
D-P Services and I can't wait to try it out. 
Helen Dalton 



Midway Campaign 

Model I/III 

Avalon Hill Game Co. 

4517 Harford Rd. 

Baltimore, MD 21214 

(301) 254-9200 

$16 tape, $21 diskette 

On June 4, 1942, the Japanese Imperial 
Navy launched an attack against the 
tiny Midway Island chain in the Pacific. 
The attack had several goals, but its 
primary purpose was to lure the battered 
remnants of the U.S. fleet out of Pearl 
Harbor for a fight to the finish. The 
American aircraft carriers, the heart of 
the fleet's strength, had escaped 
destruction in the surprise attack on 
Pearl Harbor. For all practical pur- 
poses, those carriers were all that 
stood in the way of Japan's total 
domination of the Pacific. 

Midway was a base the United States 
had to hold onto. Only 1100 miles from 
Pearl Harbor, its loss would cripple the 
American defense perimeter. The 
Japanese assembled a force of 190 ships 
in 16 groups to seize Midway and launch 
diversionary attacks. That force 
consisted of 8 carriers, 23 cruisers, 65 
destroyers, and numerous auxiliary 
craft. Against it, the Americans sent 
almost all of their forces: 3 carriers, 8 
cruisers, and 14 destroyers. That pitiful 
force seemed hopelessly outnumbered, 
but the Americans had broken the 
Japanese radio code. They had the full 
plan of the assault days in advance. 
Thus, on June 4, unknown to the 
Japanese, the U.S. fleet was already 
lying in wait northeast of Midway, 
looking for the opportunity to ambush 
the pride of Imperial Japan. 

This is the historical background 
behind Midway Campaign, produced by 
Avalon Hill. You are in command of the 
American forces, while the computer 
controls the Japanese fleet. Your forces 
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are broken up into three groups: Task 
Force 16 (carriers Enterprise and 
Hornet), Task Force 17 (carrier 
Yorktown), and Midway Island itself. 
The island possesses an airstrip and a 
small group of airplanes. Midway can be 
thought of as an "unsinkable" carrier. 

The battle takes place on a map that 
consists of a 12 x 12 array of dots. The 
distance between each dot is 100 nautical 
miles. The ships of each side move at 25 
knots, with the exception of the Japanese 
transport force, which travels at 18 
knots. 

As the game commences, it is high 
noon on June 3, the day before the battle. 
Only your task forces and Midway are 
displayed on the map. The Japanese 
forces will not be displayed until they are 
spotted by patrol planes operating from 
Midway. At the same time that you are 
searching for the Japanese, they will be 
conducting searches for any American 
vessels near Midway. The actual 
discovery of each other's ships is a 
random event over which you have no 
control. The actual battle involved a 
great deal of groping by the two sides. 
You may or may not be informed if the 
Japanese have spotted your ships. 

Your task forces are initially located to 
the northeast of Midway. The Japanese 
carrier force will approach Midway from 
the north and west. Two other Japanese 
forces will approach Midway during the 
course of the game: a cruiser force and a 
transport force. You may not 
immediately know which force is which, 
even after they are located. However, the 
cruiser and transport forces generally 
approach Midway from the west and 
south. 

You have numerous commands with 
which to conduct your battle operations 
and they are broken down into two 
groups: fleet commands and air 
commands. After selecting numerous 
settings, a strike is launched. 

All you can do now is sit back for the 
printed results of the strike. Part of your 
air strike, or all of it, may miss the target, 
an event that was all too common during 
the actual battle. The computer will 
inform you of how many hits and near- 
misses you score against the Japanese. 
The amount of damage inflicted is 
doubled if the target has planes 
preparing to take off. 

This game presents some very 
interesting problems. The Japanese 
planes have greater range than yours. If 
they spot your ships first, they may be 
able to pound you before you can even get 
a strike armed, let alone launched. No 
night carrier operations are possible, so 
you may have to break off a successful 
attack as the sun sets. Also, the opposing 
forces lose track of each other at night, so 
new searches have to begin at dawn. 



This may give the Japanese the oppor- 
tunity to strike you unaware. The 
Japanese fleet will attack your carriers 
before Midway, assuming that all three 
are in range. Thus, you may wish to keep 
your carriers at a respectful distance 
from Midway until such time as the 
Japanese reveal themselves. Of course, 
this generally means that Midway will 
be knocked out of action, but Midway is 
of only secondary interest in this game. 
The only real targets are the carriers of 
each side. 

The game ends when either all your 
carrier forces (and Midway) are 
destroyed, when the Japanese carriers 
are destroyed, or when either side flees 
the scene of battle. The Japanese will flee 
if all of their carriers are too heavily 
damaged to launch air strikes. 

This game can be very absorbing, 
especially if you have any interest at all 
in the actual battle, which was the 
turning point of the Pacific war. The 
four-page instruction manual is clear 
and presents a short historical backdrop. 
However, my copy was flawed by some 
misplaced sentences, an amazing typo 
that should have been easily caught. The 
game is attractively boxed for storage. 
Although written in BASIC, the program 
does not run slowly. 

There are a few problems. The TRS-80 
program is one of four supplied on the 
game tape. Also supplied are versions for 
the Apple, Pet, and Atari computers. The 
TRS-80 program is the second one on side 
two of the tape, so you have to search for 
the break in programs by ear before you 
can load it. You should immediately copy 
the program onto another tape to avoid 
future inconvenience. 

Aside from the battle map, there are no 
graphics associated with this program, 
nor are there any sound effects. The 
addition of either would have greatly 
enhanced the enjoyment of this program. 
It can get tiresome watching 61 planes 
bombing Midway, with the resulting hits 
and near misses being printed silently on 
the screen. 

The cruiser and transport forces take 
no real part in the battle, aside from 
being very easy targets. They're too 
easily identified to be good decoys, and 
they present no danger to your forces. 
The cruiser force and your carriers can be 
only a few miles apart, but your carriers 
are never touched. That's hardly 
realistic. 

Overall, I recommend Midway 
Campaign as an interesting tactical 
game. You are faced with the same 
frustration as the American 
commanders: you can only win by 
surprising the Japanese when they are 
most vulnerable. But, too often, the 
surprise may be on you. 

Dan Cataldo 



This bulletin board space is available 
free to individuals with single or unusual 
items for sale or trade. Basic Computing 
reserves the right to reject any 
commercial advertising in this section 
and suggests using our display 
advertising for that purpose. 

These notices are free of charge and 
will be printed one time only on a space 
available basis. Notices will be accepted 
from individuals or bona fide computer 
user clubs only. All these unclassified 
announcements must be typed, contain 
75 words or less and include complete 
name and address information. 

Need an efficient work station for your 
hardware? Include your printer, up to six 
program binders, a diskette drawer, and 
more in only five feet and a space as 
narrow as 24 inches. Compact but not 
crowded. Do it yourself for less than $60, 
plus finishing. For complete plans, send 
$5 to C. L. Day, 7353 Wild Haven Park, 
Lambertville, MI 48144. 



Overseas Club called 1001 Bytes would 
like to correspond with user groups 
stateside. We have 97 members and 
active individual user groups of Atari, 



TRS-80, Apple, Osborne, IBM PC, 
Kaypro, HP, Sinclair, and others not so 
active. Many have modems. Knowledge 
ranges from zero to expert. Eight 
thousand miles from home seems so far! 
Contact us through the current president 
W. R. Cummings (CC 956), Saudia 
Airlines, P.O. Box 167, Jeddah, Saudia 
Arabia. 



Maxine Dr., Oxford, OH 45056 or call 
(513) 523-3936. 



Help! I am looking for repair service on 
my Selectra-Print. Call Jim Mahoney 

(209) 478-8863. 



8-inch Flippies for only $1. I have 
thousands of eight-inch (3M 340/2-0) 
flippies for use in the Model 11/12/16 or 
other computer equipped with eight-inch 
drives. They can be written to on both 
sides, thus doubling your storage 
capacity. Packages often for $10, plus $2 
for shipping and handling. Write D. B. 
Shaw, 939 Ave Palos Verdes, Palm 
Springs, CA 92262 or call (619) 340-5881. 

For sale: Model I with 32K (Holmes 
internal board), lowercase. $350 plus 
shipping, or best offer. Also, Epson board 
so Model I has fully functional MX-80 for 
$50 including cable. Doug Miller, 516 



Electric Pencil 2.0 word processing 
software for the Model I/III. Original 
disk and documentation and only one is 
available. $50 postage paid. Ed Weber, 
361 North 25th St., Louisville, KY 40212 
or call (502) 774-8347. 

Mint Condition Model I, 48K, two 
drives, with RS-232 and manuals for 
$1000. J.P. Evans, 13666 S. Hawthorne 
Blvd. #5, Hawthorne, CA 90250 or call 
(213) 644-1135. 

Dallas-Ft. Worth User Groups: There 
are now four TRS-80 user groups meeting 
in the Dallas-Ft. Worth area. Mid-Cities 
TRS-80 Users Group meets 2nd and 4th 
Tuesdays, 7 PM, UTA-Arlington, Davis 
Hall, Rm B87, 800 So. Cooper and West 
Division, 637-4510. DALTRUG TRS-80 
Users Group meets 2nd Saturday, 10 AM, 
UTD-Richardson, Jonnson Hall, 2601 N. 
Floyd Rd and Campbell Rd., 370-2432. Ft. 
Worth TRS-80 Users Group meets on 
every 3rd Wednesday, 7 PM, at FRI 
Electronics, 3006 SE Loop 820 at Wichita 
St., 429-7055. 




TriSoft introduces the CP/M-68K operating system for the Radio Shack Model-16 and Model-ll Enhanced computers. This 
addition to the CP/M family adds the speed and power of the 16/32-bit MC68000 under CP/M-68K while maintaining 
compatibility with the vast library of CP/M 2.2 software. 



. Runs in conjunction with CP/M 2.2 

, Easy context switching between 2.2 and 68K 

, Z80 acts as I/O slave under CP/M-68K 



. Requires CP/M 2.2 

. 68000 assembler provided 

. Industry standard C compiler provided 



TriSoft 

4102 Ave.G 

Austin, Texas 

78751 

1 -512-445-5580 



wm® 




, CP/M, CP/M 2.2. CP/M-68K TM Digital Research 

, TRS-80 Model 16 and Model II TM Radio Shack/Tandy 



, 68COO TM Motorola 
, Z8Q TM Zilog 
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Model 100 Software 

Typing Teacher, originally 
offered by Instant Software for the 
Models I/III is now available for the 
Model 100. It is a seven-part package 
which takes a novice to complete 
keyboard mastery. On screen 
diagrams show correct placement 
for fingers to master proper 
techniques. It sells for $17.95 and 
requires 8K of memory. Contact 
Instant Software, Rte. 101 & Elm 



Teleterm 




Smart modem 



Street, Peterborough, NH 03458 or 
call (800) 258-5473 to order. 

Stock Market Master 

Market Master: Dual Moving 
Average is one of a series of program 
from Management Services for the 
Models I/III. Users can fully test a 
stock or commodity trading method 
without risking any money. Trading 
systems can be refined and 
improved. Daily buy/sell recom- 
mendations, graphs, reference 
sheets and more are produced. The 
program determines buy and sell 
points according to the crossing of 
two moving averages. You can select 
any length of time or have the 
computer search for the most 
favorable ones to use. Price is under 
$125 and for more information 
contact Management Services, 2901 
Clendenen Lane, Longview, TX 
75601 or call (214) 753-1850. 



Smart Modem 

The UDS 212AD is a fully- 




functional auto dialing, auto answer 
0-300 or 1200 baud modem from 
Universal Data Systems. The unit 
has an automatic calling unit that 
allows the calling of up to five, 
preset, 30-digit numbers. The built- 
in operating directory can be 
displayed anytime as well as its 
built-in test functions. Most 
operations can be invoked with a 
single keystroke. The unit currently 
sells for $795 and allows for 
asynchronous or synchronous 
operation. Contact Universal Data 
Systems, 5000 Bradford Drive, 
Huntsville, AL 35805 or call (205) 
837-8100 for more information. 



Help for Profile III Plus 

Crest Software offers over 75 
helper sheets that can be added to 
your Profile III Plus manual. 
Included are two 17 X 22 inch wall 
charts showing program flow, why's 
and commands to use. A host of 
examples and tips on data layout 
help the user understand and utilize 
the program. The inserts and wall 
charts are shipped prepaid for $12, 
or purchase the wall charts 
separately for $2 prepaid. Contact 
Crest Software, 2132 Crestview Dr., 
Durango, CO 81301 or call (303) 247- 
9518. 
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Oasis Operating System 

Caravan is a new communica- 
tions system designed for members 
of the Oasis Users Group. The board, 
located in Santa Barbara, CA, is 
operated 24 hours a day at 300 baud 
and their number is (805) 965-5415. 
There are plans to add 1200 baud 



iifiiti 
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Daisy whee. 



There was a need for a low cost letter quality machine that would 
be suitable for use as an office typewriter, and as a computer printer. 
Ammicro met that need by combining the Microwriter parallel inter- 
face and the traditional Olivetti craftsmanship that was available in 
their Praxis machine. 

With the Microwriter you can have the best of both worlds a let- 
ter quality printer, and a high quality office typewriter all in one 
machine, that sells for less than the cost of a good dot matrix printer! 

It's not just printer or a typewriter that comes complete with a 
deluxe carrying case, but a feature-packed, lightweight machine that 
doubles as an office typewriter. This printer is a simple, low cost, 
reliable unit which can be utilized with word processing systems, 
microcomputers, personal computers, and small business systems. 
The Microwriter' s low noise level and slim modern styling allow it to 
blend with any decor. 

The Microwriter' s print quality is identical to the finest office 
typewriters on the market. This machine is not only perfect for let- 
ters and manuscripts, but with it s 165 character, 12 inch print width, 
the machine is perfect for letter quality budget spread sheets, price 
lists, data sheets, and forms. 

The Microwriter can tab, rule single lines both vertical and 
horizontally, underline and print at 10, 12, or 15 characters per inch 
(switch selectable)! Its ten character memory for automatic error 
correction, lift off correction ribbon, and fixed or programmable page 
formats are a few of the many features that make it a perfect office 
typewriter. Microwriter not only handles letter and legal size sheet 
paper in widths up to 12 inches wide, but also handles fanfold paper. 

There's a wide selection of 21 interchangeable daisy wheels 
available. And ribbon cassettes that just drop in. With the 
Microwriter you will never again have to send an important letter or 
a simple correspondence that doesn't look impressive. 



It s operation as a computer printer is simple. Just load it up with 
paper and you are ready to go. Centronics compatible parallel output 
cables are currently available from stock for the following com- 
puters: IBM PERSONAL COMPUTED, OSBORNE lTM, 
ZENITH Z-100™, BURROUGHS B-20TM, Convergent 
Technologies models IWS & AWS™, TRS-80 MODEL I, II, III™, 
APPLE II™ . . . custom cables also available by special order. 

This machine creates a new standard by which all current low 
cost letter quality printers will follow. Ammicro' s Microwriter is tru- 
ly designed for the lifestyles of the 80's and for decades to come. 

Why settle for just any printer when you can have a 
MICROWRITER. . . .a fine letter quality typewriter for you and 
your computer. 

The Microwriter is the only daisy wheel printer on the market for 
$680. For more information, see your local computer dealer or con- 
tact Ammicro directly. 




corp 

122 East 42 Street, Suite 1700, New York, N.Y. 10168 
(212) 254-3030 

DEALER INQUIRIES 

IHWITED 

For orders call: 

1-800-251-5110 

MICROWRITER is a trademark ol Ammicro 
Corporation. I'ARAXIS 30 is a trademark ol Olivetti 
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capability later. 

The Oasis Users Group, OUG, the 
sponsor of the board, now has about 
500 members and their library 
contains over 1200 files of utilities, 
tutorials, applications, games and 
more for the Oasis user. Most 
members are computer profession- 
als and about 15 percent are users 
from other professions (doctors, 
lawyers, CPA's, etc.). Currently, the 
operating system has been 
implemented on the TRS-80 Models 
II, 12, and 16. Membership in the 
club is $35 per year. Send complete 
information about your equipment, 
software, and possible library 
contributions to Fred Bellomy, 
Oasis Users Group, P.O. Box 2400, 
Santa Barbara, CA 93120 or call 
(805) 965-0265 for more information. 
You will receive two 8 inch diskettes 
containing information about the 
library, newsletters, and a 
representative selection of library 
software. 

On Line Flea Market 

The flea market is available free to 
all users, both private and business. 
Its main purpose is for users to list 
computer-related items or services 
they wish to sell or buy. Users open 
their own accounts and may place 
ads of up to five lines of 60 
characters each, plus a heading. 
The board is sponsored by Stanford 
Software Systems of Colorado 
Springs, CO and service is available 
24 hours a day at 300 and 1 200 baud. 
Phone, via modem, (303) 685-1733 or 
by voice (303) 685-5975. 

Lazymerge 

AlphaBit Communications, Inc. 
announces a mail merge program 
for use with their Lazy Writer word 
processing system. The program, 
Lazymerge, merges names and 
other information from the mail list 
with a text file. It allows for selective 
printing from the list and users can 
even select substitute lines of text to 
be used if information in the mail list 
is not appropriate for the line of text. 
For instance, print "Dear Customer" 
if you have a company name and no 
person's name in the mail file. 

Currently, Lazymerge only works 
with a mail list kept as a Lazy Writer 
file or with a list kept with Postman 
(another AlphaBit Communica- 
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tions, Inc. program). The program 
sells for $44.95 and for more 
information contact AlphaBit 
Communications, Inc., 13349 
Michigan Ave., Dearborn, MI 48126 
or call (313) 581-2896. 



Terminal look-alikes 

• -' . . -'."'■ ''■■ 



Kensoft, 2102 50th Street, Kenosha, 
WI 53140 or call (414) 654-2722. 



Terminal Look-alikes 

The CompuGift line of terminal 
look-alikes are made of high quality 
molded plastic, measuring 4 1/2 X 6 
X4 1/4 inches. The Computer Caddy 
stores pens, pencils, note pads, and 
there is a version for plants called 
the Computer Planter, and one for 
loose change called the Computer 
Bank. Each has a clear acrylic 
screen for storing your favorite 
photo and it comes in four colors, 
beige, dark grey, yellow and 
magenta. 

It can even be imprinted with your 
company logo. Gift boxed; $9.99 
each plus $2.00 shipping. For 
quantity discounts or imprinting 
information contact CompuGift, 
Inc., 27802 Perales Street, Mission 
Viejo, CA 92692 (714) 768-8223. 

Refunders Relief 

Kensoft has introduced this 
program for keeping track and 
making effective use of refund, 
coupon and proof of purchase offers. 
Refunders Relief will work on Model 
I or III computers with 16K or more 
RAM. The routine will file all the 
necessary information on sixty 
different refund offers and 250 
different proofs-of-purchase (POP) 
requirements. Match form 
requirements to the available POPs, 
save effort, time, and take 
advantage of the tremendous 
savings possible through product 
refunds and promotions. Contact 



Colorpede 

Colorpede is a new arcade quality 
game from Intracolor Communica- 
tions. This one or two player game 
for 16K Color Computers has 
players attempting to destroy the 
Colorpede as it slithers through the 
toadstools. As scores accumulate 
the action intensifies and more 
bugs, plants, and toadstools ob- 
struct your progress. This fast 
action, high resolution, all machine 
code game uses keyboard or joystick 
input. Cassette version is $29.95 and 
disk version is $34.95. Add $1.50 for 
shipping. Contact Intracolor 
Communications, P.O. Box 1035, 
East Lansing, MI 48823 or call (517) 
351-8537. 

Teleterm 

Telexpress, Inc. has released three 
new versions of Teleterm, a 
communications software system. 
Teleterm is an intelligent terminal 
software package that allows 
asynchronous communication to 
virtually any other computer. 
Features include being able to 
download and upload files directly 
disk-to-disk between Teleterm 
systems (for example, TRS-80 Model 
II to TRS-80 Model III or TRS-80 to 
IBM-PC); file transmission directly 
from disk which eliminates memory 
buffer limitations; user-definable 
auto-transmit messages of up to 255 
characters; and more. 

Two of the new versions are for the 
Model 11/12/16, and a CP/M 
version for the Model II ($165). A 
third version is for the IBM-PC 
under PC-DOS ($125). A Model III 
version is available for $89.95. 
Contact Telexpress, Inc., P.O. Box 
217, Willingboro, NJ 08046 or call 
(609) 877-4900. 

Program Library System 

The Arranger is a fast machine 
code program for the Models I/III 
that automates and catalogs your 
diskette library. It resides on its own 
diskette where it internally stores 
the directory for each of your 
diskettes. Capacity is for up to 250 
diskettes with over forty programs 
on each one. Alphabetize all or part 
of your library in a few seconds. 
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Scanning or printing the 
information is easy. Updates can be 
done with a single keystroke. 

The program is compatible with 
all popular DOS systems and can be 
used with one to four disk systems, 
whether 35, 40, or 80 track. Cost is 
$29.95, from Triple-D Software, Box 
642, Layton, UT 84041, phone (801) 
546-2833. 

Video Game Glove 

Nancy and Company offers a 
solution to sweaty palms and 
blistered thumbs. The Videomax 
game glove is available in three 
colors (white, navy blue, and beige), 
is made of calfskin leather with a 
non-slip grip, has a netted backing, 
and velcro fasteners* The glove is 
available in left and right handed 
versions and three different sizes (S, 
M, L). The glove sells for $6.95 plus 
$1.00 shipping (California residents 
add .45 sales tax). Contact Nancy 
and Company, 22594 Mission Blvd, 
Suite 302, Hay ward, CA 94541 (415) 
582-2246. 



Video game glove 






C- Compiler for LDOS 5.1 

Integer subset with float via functions 
Standard I/O redirection 
Unix-compatable standard library 
Sequential files with read, write, append 
Extensive installation library 
Generates Z 80 source as output 
Dynamic memory management 
Includes EDAS 4.1 macroassembler 

Over 250 page reference manual 

+ 




MISOSYS 




X 4848 



ALEXANDRIA, VA. 
703-960-2998 
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ACCESS UNLIMITED 





FREE! DOSPLUS 3.4** 
disk operating system 
with any Percom or 
1st Drive System 
for the Model III* 



PERCOM™ QUALITY FOR YOUR MODEL III™ 

Nothing but the best for your "Model III". Percom internally mounted 
drive systems: including 4 drive controller with gold edge connectors 
d ?nno d ™ nsi !y dlsk drive or drives ' al1 hardware and cabling. A free copy 
of DOS Plus 3.4 is also included with every first drive purchase 

TFD 340N1 one drive single sided double-density $449.00 
TFD 340N2 two drive single sided double-density $699.00 

Brand Spankin' New! SALE Dual Headed Drives 
for the Price of Flippies! 

^TOH.P 3 " have a * dual neaded "PERCOM" Drive System for your 
Model III!! ' 

TFD344N1 One drive dual headed double-density $560.00 
TFD344N2 Two disk dual headed double-density $860.00 

completely compatible with programs existing on single sided or 

double sided diskettes. 



• WE HAVEN'T FORGOTTEN THE MODEL PS! 

$ Upgrade your Model |tm to Double Density All for 159.95!! 

£ You have a good system and you just don't want to sell out to a Model 

X L" "Upgrade with the Percom Doubler II, the overwhelming favorite 

Q double density adapter for over 2 years! Simply plug the adaptor into 

_ your expansion interface and run either single or double-density 

J ass a^sTo'tt/gEi 008 Plus 3A but wi " aiso mn 

# PERCOM™ QUALITY FOR YOUR MODEL I™ 



TFD40-1 
TFD44-1 



40 track single sided drive 
40 track dual sided drive 



$275.00 
$350.00 



Percom™ Hard Disk — Quality for your System 

• works with existing floppy drives Ren from S2495 

• can be daisy-chained up to four hard disks 9 ' 

• DOS Plus 4 or LDOS included FREE Now from $1 395 

• Now available for immediate delivery in 5 & 10 meqabyte 
configuration 

Can be used for Model I*, II*, III*, "Apple II" or "IBM PC" 
computers. 

DOS + 3.4 Reg. $159.00. Sale $99.95 

MAKE SURE IT'S DONE RIGHT! 

... Let Us Install Your First-Drive System 

Purchase your Model III* Drives from us and for S79.95 plus shippinq 
you can have our experienced professionals perform a 48-hour burn-in 
of your Model III* computer, install the drive system, and check out 
your expanded system to make sure everything works correctly Call for 
pricing of complete Model III* system with 2 to 4 Access Unlimited or 
Percom drives. 



TRS-80 MODEL 100 PORTABLE 
COMPUTER 

"The Executive Micro Workstation" 

• Powerful Built-in Software: 

— Word Processing — Extended Basic 

— Terminal Communications — Address Book 

— Telephone Dialer — Appointment Scheduler 

— Applications Software 

® Retains Memory Data When "off" 

• Self-contained Telephone Modern 

With 8K ONLY $799.00 

Wlth 24l < ONLY $999.00 



PowerSOFT Software from Breeze/QSD Inc.™ 
One disk "BOOTS" up on either machine. At PowerSOFT, we don't 
,,, Ie ^, l ,1 l m , akm 9 a custom er buy a separate version for Mod I or III 
We ALWAYS include BOTH versions on the SAME disk for your 
maximum convenience. 80 Track versions are available on request 
All titles are for Mod I or III unless specified 



PowerSOFT Product Title 

SUPER UTILITY PLUS/3.0 
SUPER UTILITY PLUS/3.0 for MAX80 
INSIDE SU + /3.0 MANUAL 
SU + /3.0 TECH MANUAL 
INSIDE SU + /2.2Z MANUAL 
SU+/2.2Z TECH MANUAL 
"THE TOOLBOX" for LDOS 
"MASTER MECHANIC SET" for LDOS 
POWERDRIVERS for SuperScripsitTM (printer drivers) 
POWERDRIVER/E (EPSON MX-80/100 h 

POWERDRIVER/P (PROWRITER) 
POWERDRIVER/F (F-10 STARWRITER) 
POWERMAIL 

POWERMAIL PLUS* - Mod I, III, MAX80 
POWERMAIL PLUS* — Mod 11/12/16 
POWERDRAW 

POWERDOT (EPSON or PROWRITER Only) 
POWERTERM Smart Terminal Pkge 
DOSPLUS II Operating System 
For Model II, 12, and 16/Z80 
SCRIPLUS3.0 

THE BASIC/S COMPILER SYSTEM 
MAKE/80 (Mod I or III) 
SUPER UTILITY (Mod I ONLY!) 
QUICK-FIX (Mod I ONLY!) 
'Coming out very soon Please inquire lor shipping date 



Retail Price 
$ 79.95 
$ 99.95 
$ 19.95 
$ 14.95 
$ 19.95 
$ 14.95 
$ 69.95 
$ 39.95 

$ 29.95 
$ 29.95 
$ 29.95 
$ 99.95 
$150.00 
$150.00 
$ 39.95 
$ 49.95 
$ 29.95 
$249.95 

$ 39.95 
$ 49.95 
$ 19.95 
$ 29.95 
$ 19.95 



BIG DISCOUNTS ON PRINTERS 



New! Brother HR1TM 
MicroprismTM 
C.itoh F-10TM 
Transtar 130TM 
OkidataTM 



Only $ 980.00 
Only $ 699.00 
Only $1495.00 
Only $ 895.00 
All Models Call for our 

superlow prices! 



DIABLO™ MODEL 2300 MATRIX PRINTER 
Close Out Special — 

•Rugged, commercial duty • 7x9 dot matrix • High Speed! 200 
CPS! • Top of the line, highest quality 

&SL ".ir^SB 



We have added approximately $400,000.00 worth of 
brand new business and game software with more 
arrivals daily. 
Call or write for our new FREE catalog. 



Save $$ on our most popular items! 

Percom Data Separator (reg. $29.95) 
Screens for Models 1*, IT. Ill Green, Lt. Blue, 

Dark Blue, and Amber Bronze tor color video 

(reg. $24.95) 
Head Cleaning Kit (reg. $29.95) 
Drive Numbering Tabs. pkg. 0-3 (rpg. $4.50) 
Flip-N-File 8" (reg. $54.95) 
NEW Style Smoke Grey File VA", Holds 75 



Now $23.95 



Now 
Now 
Now 
Now 
Now 



$12.95 
$19.95 

$28.95 
$24.95 



COLOR CODERS — 5 Cases (stores 
10 disks ea.) — 5 different colors ' 
Library Cases (holds 10) 



$24.95 
$ 2.95 ea 



MEDIA FOR LESS 



SENTINEL™ complete with hub rings & one year limited warranty. 



Single sided Single density 5V4" 
Single sided/Double density SW 
Double sided Double density SW 

Single sided Oouble density 8" 
Double sided Double density 8" 



$18.70 bx of 10 
$20.70 bx of 10 
$27.80 bx of 10 

$29.70 bx of 10 
$38.70 bx of 10 



BUY DISKETTES IN BULK AMD SAVE $$$$$$$$$$$$$$$$$ 

These prices good by the case only — 

Single sided/Single density 5V*" $179.00 case of 100 

Single sided Double density 5 1 /V $190.00 case of 100 

Double sided/Double density 5Vi" $225.00 case of 100 



Single sided Double density 8" 
Double sided/Double density 8" 

BASF™ Diskettes Lifetime Limited Warranty 
5%" Singlesided Double Density 
5VV' Doublesided Double Density 
8" Singlesided Double Density 
8" Doublesided/Double Density 

FREE! Source™ with 
SIGNALMAN™ MODEM 

Mark I with RS232C Interface 
Mark II with Atari Interface 
Mark III with Tl Interface 
Mark VI with IBM Interlace 
Mark VII with RS232C Interface 
&auto answ. orig. 



$280.00 case of 100 
$340.00 case of 100 



$24.95 
$34.95 
$39.95 

9i4Sf .SID 



$ 99.00 

$139.00 
$279.00 

$159.00 



Anti-StatiC MatS — Colors: Russetl. Blue & Gold. Natural Brown 



& Golden Brown. 
3' x 5' — Reg. S75 60 
4'x6' — Reg. $120.90 
4' x 8' — Reg. $161.30 



Sale: $57.00 
Sale: $91.00 
Sale $122.00 



"PAGEMATE" Typing Easels — $14.95 
SAVE on an "Arrick Quick Switch 9 ' 

Changes a 'TRS-80" printer port or a peripheral between computers 
instantly and easily. Available for "RS-232" and "Centronics." Plugs 
included. 

Now from $99.95. Cables from $26.95 



r 



BEAUTIFUL CUSTOM FURNITURE 

"Atlantic Cabinet" — Oak! 

5Q" Split Level Desk $249. 

50" Personal Computer Desk $126. 

38" Personal Computer Desk $105. 

Matching Printer Stand $89. 

"Toor" & "O'Sullivan" Computer Furniture Also Available — Call 
For Details, Prices 



Print Wheels & Thimbles — From $8.50 each 

Printer Ribbons — For Centronics, Diablo, C-ltoh, Star and Epson 
80, 100 From $5.95 each 

• LIMITED TIME OFFEMIMITED QUANTITIES • 
* Prices subject to change without notice * 

" '*3dema/K of Tandy toac Sfiack Corp 

Reg. Trademarks • Prices do not include state taxes. 
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VISA 



1 (800) 527-3475 
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Order by phone or by mail. We accept Visa. MasterCard, cashier's checks, certified 
checks, and money orders. With personal checks, allow additional time for bank 
clearance. Your bankcard will not be charged until your order is shipped. On orders 
over $1,000, we pay freight (surface only) and insurance; please add $3.00 
shipping and handling over 50 lbs. Over 50 lbs., add $5.00 for orders under 
$1,000 00. Texas residents add 5°o sales tax Allow 2 to 4 weeks for delivery 



□ Please send me a FREE catalog. I'm not ready to order at this lime. 

□ YES. I'm taking advantage of your Sales prices. 

Name 










Company Name 
Address 





City 

Phone Number L 
Quantity 



State 



Zip 





Item 



Unit Price 



Subtota 




Subtotal 
State Sales Tax (Texas residents only) 

handling charge 

Check one: To^ 1 

D payment enclosed □ Visa □ MasterCard* 

























, 














, 








If MasterCard, numbers above name: 



Expiration Date: 



Authorized signature, if charged 
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ACCESS UNLIMITED 



DEPT. B-9/401 N. Central Expy. Richardson, Texas 75080 

Tel. 1-800/527-3475 214/340-5366 

214/690-0207 — Sat. and Evenings Only 
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TRS-80 
MODEL I 



DISK 

INTERFACING 
GUIDE 

$5.95 

POSTPAID 

FIRST CLASS 

(United States On\y) 

$7.95 Foreign Airmail 
(U.S. Funds) 



Send to: 

80-N.W. Books 

3838 South Warner St. 

Tacoma, WA 98409 

(206) 475-2219 

Dealer Inquiries Invited 

TRS tfft tb a ivgiSTervd Trademark ai Tandy Corporation 
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Send 



Copies of the Guide 



Check Enclosed 



Visa or MasterCard 

# 



Exp. Date 
lure 
Name 



Address. 



State 



Zip, 



A Division of 80-Norihwesr Publishing. Inc 



Books 



Advertiser index 
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Advertiser 

ABC Data Products , 
ALPS 

Aardvark 

Access Unlimited . . . 
Adef Computer Mart- 
Ad venture Internationa 
Allen Gelder Software . 

Ammicro 

Analytical Processes Corp. 
Anitek Software Products . 
Applied Microsystems, Inc. 
Armstrong Genealogical Sys. . . 



Page 

97 
.. 7 
. 31 
, 107 
. 93 
110 
59 
103 
85 
78 
49 
46 



Artificial Intelligence Technology. 83 

Astro Star 94 

B.T. Enterprises 75 

BAPS Software 97 

Barclay Whyte Associates 97 

Bridgeware 93 

Brylar Technology 77 

CDC 8 

CRB Microtools 69 

Communication Cable Company 97 

Compu Kit 60 

Compu-Quote . 95 



Computer Friends 13 

Computer Services of Danbury . . 80 

Computer Trader 90 

Comstar Research 85 



Convert-A-Disk . 



4*1**14 + 144*1 



Cosmopolitan Electronics Corp 

Crest Software 

Cybertext Corp 

DFW Computer Center . 

Data Mania, Inc 

Delta Micro 

Direct-To-Tape 

Discovery Games 

Disk N' Data 

EAP Company 

Educational Media Associates 

L_ kJ twi l\l I J » ■ v ■ ■ 4 * * ■ » 4 » ■ 4 - 1- 4 

80- North west Publishing 
Epson America, Inc. . 
Ft. Worth Computer . 
Gamester Software . 

H.A.K. Workshop 

H.B.J 

Hexagon Systems . . . 
High Desert Engineering 
Holman D.P. Service. . . . 



. 95 
. 53 
. 79 
. 96 
,. 87 
,. 95 
,. 97 
,. 97 
.. 49 
.. 99 
.. 97 
. . 92 
.. 98 
9, 108 
32,33 

.. 62 
.. 95 
.. 51 
.. 78 
.. 76 
.. 98 
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Holmes Engineering, Inc. 

Howe Software 

K&L Software 

Logical Systems, Inc 

Lynn Computer Service . 
MCS Software 

IVHOv^JOYO , , , * 

Mary mac Industries, 
Mayday Software . . 
Memory Merchant . 
Mercer Systems .... 
Micro Architect, Inc. 

Micro Images 

Micro Labs, Inc 

Micro Management Sys., Inc 
Micro Software Systems . . 
Microcomputer Applications 

Mfcrosette Co. 

Microsystems Software, Inc. 

Midwest Comp-U-Tron 

Mister Softy 

Modular Software Associate 

New Classic Software 

Nocona Electronics 

Nodvill Software 



83 
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111 
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Omnisoft Research 90 



Pel-Tek 
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Pickles & Trout . . 26 

Powersoft 25, 81 

Practical Programs 95 

Programmed Press 95 

Programmer's Guild, The 109 

Proper Touch, The 76 

RAM Pnrts 77 
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REM Industries, Inc . . 95 

Radio Shack 56, 57, 1 1 2 

Sales Data, Inc 95, 99 

Scientific Engineering Labs 99 

Scripture Software 43 

Snapp-Ware 38, 39 

Software Exchange, The 99 

Southern Cntr. for Research & Inn. 99 

Southfork Software, Inc 95 

SubLOGIC Corp 67 

Team Computer Products 69 

Treesoft Software Co 91 

Trisoft 101 

United Software Associates 41 

Vespa Computers 10 

Wadsworth Electronic Publishing . 81 
Zygotron 98 
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THE PROGRAMMER'S GUILD 

PRESENTS 





BY 



CHARLES FORSYTHE 



THE ULTIMATE in PAC-ACTION 



ONLY $19.95 



OP TO 4 PLAYERS!! 



Unlike any other "PAC" game you've ever seen!! 

Hot Machine Language Multi-Color 
Hi-Res Graphics For All 1 6K TRS-80 

Color Computers 

MORE SOUND-MORE ACTION 
MORE FEATURES THAN ANY "PAC" GAME IN 




Try PAGDROIDS"™ for the Outer Limit in pure, 

explosive arcade action!! 

SEND $19.95 CHECK/MONEY ORDER OR VISA/MC* 



THE PROGRAMMER'S GUILD 

PO BOX 66 
PETERBOROUGH, NH 03458 

OR CALL (603) 924-6065 FOR C.O.D. 



AND GET "FREE" SHIPPING ANYWHERE ON THE PLANET EARTH OR HER COLONIES 
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A MICROCOMPUTER 
EXPERIENCE 
FOR TODAY 

Arcaders who've seen and played 
the ATARI and TRS-80 versions of 
STRATOS came to the same 
conclusions — these state-of-the-art 
games were ahead of their time. After 
all, any program that boasts crisp 
graphics, punchy sounds, joystick 
compatability and a full complement of 
extras, like high score saving and 
multi-player option has a definite touch 
of tomorrow. 

THE GAME'S SCENARIO IS A REAL 
KNOCKOUT 

The object is to successfully 
defend a futuristic city from waves of 
attacking alien ships. 




ATARI SCREEN SHOT 
The battle begins! Alari version features 
colors and sounds that YOU can change! 







And these crafty alien critters are 
just part of a rapid-fire graphics 
bonanza that includes meteor swarms, 
multiple attack waves, and even a free- 
moving saucer that will repair your 
city's damaged force field on the ATARI 
version. 
GOOD NEWS 

You don't have to wait years for 
the spectacular — STRATOS Is 
available now for the ATARI and TRS-80 
systems. 

STRATOS. Entertainment of the 
future — today. 




TRS-80 SCREEN SHOT 
The TRS-80 version blows you away with its 
Arcade Action Graphics(tm)! 




© COPYRIGHT 1W2 



dventur€ 

INTERNATIONAL 



To order, see your local dealer. If he does not have the program, then call 
1-800-327-7172 (orders only please) or write for our free catalog. 

Published by ADVENTURE INTERNATIONAL 

a subsidiary of Scott Adams, Inc. 

BOX 3435 • LONG WOOD, FL 32750 * (305) 830-8194 




AVAILABLE NOW! 



ATARI 400/800/1200 16K TAPE . . 


« i » i ■ 161HJI6 


1 $34.95 


ATARI 400/800/1200 32K DISK . . 


162416 


1 $34.99 


COMMODORE 64 TAPE 


i * « * ■ loU-ulB 


1 $34.95 


C0M0D0RE 64 DISK 


162-0161 


1 $34.95 


TRS-80 16K TAPE 


0KHJ161 


1 $24.95 


TRS-80 32K DISK 


012-41161 


1 $24.95 



Coming Soon For The Color Computer! 

PRICES SUBJECT TO CHANGE 
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ERSI 
THE TRS-80™ OPERATIN 
^* MODEL I AND III 



First Time Available to the Public Is This 
Unbelievably Priced Sub-Set* of the Renowned 



LDOS Operating System. 



plus $3.00 
Shipping & Handling 



* Note: smal-LDOS does not contain all the features or utilities of the original "FULL LDOS" system. 



* ModeK smal-LDOS provided on 35 track single density media. ; 

* Model-IE smal-LDOS provided on 40 track double density media. 

* smal-LDOS can be provided on special media configurations at an additional 

charge. 

' Prices & Specifications are subject to change without notice. 
t Although not required, LSI recommends two or more drives when using smal-LDOS. 

DEALER INQUIRIES WELCOME. smal-LDOS is a product of LSI. TRS-80 is a trade- 
mark of Tandy Corp. 

Logical Systems, Inc. 8970 N. 55th P.O. Box 23956 Milwaukee, Wl 53223 






(414)355-5454 



DISCOVER THE WORLD OF COMPUTING WITH 
RADIO SHACK'S NEW TRS-80 MICRO COLOR 



COMPUTER MODEL MC-10 




26-3011 



(TV Not Included) 
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Eight Colors ■ Sound Effects 

Over 4000 Characters of Internal Memory 

Many Programming Commands Similar to Our 
Popular Standard Color BASIC Language 

Ideal for Both Beginners and Hobbyists 



■■ 



Low-Cost Versatility. The new TRS-80 Micro Color 
Computer is your chance to join the "computer revolu- 
tion" with a very small investment! Just attach it to your 
TV, and discover the ease of creating graphics with excit- 
ing colors and sound. Or learn to program with the enter- 
taining manual that comes with the MC-1 0. You can even 
choose games and personal time-saver programs from 
our library of ready-to-run MC-10 cassette software. ' 

Compact, Yet Powerful. The MC-10 features an attrac- 
tive case that measures just 2x7x8 1 /2" and weighs 
only 29 1 /2 ounces. Many advanced features are easily 
accessed via its 47-key typewriter-style keyboard. Best of 
all, the MC-10 has real keys— not a flat plastic overlay. 

Deluxe Programming Features. Enter complete 
BASIC commands by pressing just two keys! For graph- 
ics, just depress the "Shift" key and the desired graphics 
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The biggest name in little computers® 

A DIVISION OF TANDY CORPORATION 
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character key for colorful displays in seconds. Even save 
and load programs to and from tape with an optional 
cassette recorder 

Easy Expansion. Add an extra 16,000 characters of 
memory with the new 16K RAM' Module (Cat No 
26-3013, $49.95). The MC-10's RS-232C serial interface 
lets you connect a printer. And, for low-cost communica- 
tions, add a telephone modem and appropriate software 
to access information services! 

See It Today! The TRS-80 Micro Color Computer MC-10 
is at the Radio Shack store, Computer Center or partici- 
pating dealer nearest you! 



Please send me your free brochure on the new 
TRS-80 Micro Color Computer Model MC-10. 

Mail To: Radio Shack, Dept. 84-A-17 

300 One Tandy Center, Fort Worth, Texas 76102 
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ZIP 



I 

£ I 

„ 1 

Prices apply at participating Radio Shack stores and dealers. Available but may not be 
stocked in all participating stores and dealers. 



